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1.  INTRODUCTION 


The  objective  of  the  Defense  Nuclear  Agency  (DNA)  sponsored  SKYNET 
program  is  to  develop  a methodology  for  the  assessment  of 
satellite  vulnerability  to  system  generated  electromagnetic  pulse 
(SGEMP)  effects  from  nuclear  weapons . The  approach  includes  a study  of 
basic  phenomenology  and  development  of  cost-effective  simulation 
techniques,  as  well  as  improving  SGEMP  instrumentation  and  data 
acquisition  and  recording  techniques. 

This  text  presents  detailed  descriptions  of  the  SKYNET  Applications 
Software  Package  (SASP)  main  routines  (tasks)  and  subroutines  used  in 
the  SGEMP  Transportable  Automated  Recording  System  (STARS) . The  SASP 
code  controls  the  Digital  Equipment  Corp.  (DEC)  PDP  11/40  based 
instrumentation  system  and  acquires,  records,  and  reduces  the  data. 
Details  concerning  the  STARS  operation  are  given  in  the  SASP  Operator's 
and  User's  Handbook1  and  in  several  EG&G  publications.2' 3 

References  to  the  standard  SASP  digitizer  and  channel  error  codes 
and  to  the  standard  terminal  input  conventions  contained  in  the 
documentation  of  several  tasks  and  subroutines  may  be  found  in  the  SASP 
Operator's  and  User's  Handbook.1 

Although  not  mandatory,  a ..reader  knowledge  of  DEC  MACRO-11  assembly 
language  and  related  terminology  will  prove  helpful  in  understanding 
certain  portions  of  the  SASP  documentation. 


2.  INDIVIDUAL  TASK  DOCUMENTATION 

The  following  standard  entries  have  been  used  to  document  the  SASP 
tasks: 


Entry 


Task  name 


Language 


Definition 


Name  of  task 


DEC  PDP  11  FORTRAN  or  MACRO-11 


1 Walter  J.  Scott  and  John  R.  Hiller,  SKYNET  Applications  Software 
Package  (SASP)  Operator* s and  User*s  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977). 

2Data  Acquisition  and  Processing  System  (DAPS),  EGSG  AL-1261, 
Albuquerque,  NM  (30  November  1976). 

3 Trigger  Marker  Generator  EGSG  Model  ATX-6,  EGSG  AL-1238 , 
Albuquerque,  NM  (13  August  1976). 
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Definition  (Cont ' d) 


Date  of  Date  that  task  was  written 

documentation 


Subroutines 

called 


Those  subroutines  called  directly;  entry  points, 
if  any,  are  in  parentheses 


Files 


Disk  files  referenced  by  task 


Input/output  Devices  used  by  task 

(I/O)  devices 

Description  General  narrative  description 

Algorithms  Description  of  any  significant  algorithms  utilized 

Comnon  areas  Areas  common  to  one  or  more  tasks 


Flowcharts  American  National  Standards  Institute  (ANSI)  symbols 


Typical  output  Sample  of  typical  output 


Standard  format  entries  are  included  only  as  needed.  The  Subroutine 
Cross-Reference  List  (app  A) , the  Standardized  Common  Areas  (app  B) , and 
the  PLOT-lO/Terminal  Control  System  (TCS)  subroutines  used  by  SASP 
(app  C)  give  more  detailed  information. 


ATN 


FORTRAN 


Subroutines  called: 


File: 


I/O  devices: 


Description : 


Written  May  1976 

AINIT,  ANEW,  ANSWER,  ARDENT,  ARDNEX,  ARESET, 
ASDCD,  ATN REF,  AWRADD,  AWRENT,  FLDCD,  INPUT 

DK1 : [ 100 , 100]  ATNCAL. DAT 

TI:,  LPO : 

Task  ATN  generates  and  maintains  the  device 
calibration  file,  ATNCAL.DAT.  Each  mode  of 
operation  is  selected  by  the  proper  command  from 
the  following  list: 

GN  Start  a new  file 

EN  Enter  new  device  information  (including 
modifying  an  old  entry) 

PE  Print  selected  device  information 

PA  Print  the  file  contents 

HE [LP]  List  command  codes  in  response  to  "A:" 

as  a prompt;  an  immediate  carriage 
return  (CR)  terminates  the  task 

Modes  that  require  additional  information 
(specifically,  EN  and  PE)  request  it*  Standard 
SASP  terminal  input  conventions  apply.  Both  of 
these  modes  request  a device  identification 
(ID) ; am  immediate  CR  causes  an  exit  from  the 
mode  to  the  command  interpreter. 

See  SASP  Data  Input  Requirements,  Operator's  amd 
User's  Handbook.^ 


^Walter  J.  Scott  and  John  R.  Hiller,  SKYNET  Applications  Software 
Package  (SASP)  Operator* s and  User’s  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977) . 
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Flowchart : BASE 


BASE 

MACRO-11 

Written  April  1976 

Subroutines 

called: 

ATTEN  (TRIGB) , CHKTRG, 
CLRCBD , CMDDIG , GETBAS , 
INTABL , SCIO  (SCIN  SCOUT) 

Files: 

DKO:  [100,100]  SYSCON.DAT, 
DK1 : [100,100]  MAIN . DAT 

I/O  devices: 

TI : , digitizers , attenua- 
tor control  unit 

Description : 

Task  BASE  acquires  the 

baseline  trace,  reduces 
it,  and  stores  it  on  en- 
abled digitizers.  Trig- 
gering is  done  automati- 
cally. The  raw  baseline 
trace  is  normalized,  and 
the  bloom  is  calculated. 
The  digitizer  knob  read- 
out is  compared  with  the 
setting  requested . Stan- 
dard SASP  digitizer  and 
channel  error  codes 
apply.  Any.  error  con- 
dition, past  or  present, 
on  either  a digitizer  or 
a channel  also  results  in 
a NOB  (no  baseline)  error 
on  the  associated  dig- 
itizer. If  the  initial 
errcr  occurs  after 
normalization , a baseline 
trace  is  still  actually 
stored . 
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BLKCNT 

FORTRAN  Written  May  1976 

Subroutines  called:  SCIO  (SCIN) 

File:  DKO: [100,100]  SYSCON.DAT 

I/O  device : TI : 

Description:  Task  BLKCNT  prints  the  number  of  disk  blocks 

required  for  the  MAIN , DAT  file.  The  value  is 
stored  in  the  SYSCON.DAT  file  by  task  CONGEN. 


BLMCHK 

FORTRAN  Written  August  1976 

Subroutines  called:  PAGE,  SCIO  (SCIN) 

File:  DKO:  [100,100]  SYSCON.DAT 

I/O  device  TI : 

Description:  Task  BLMCHK  provides  a quick  look  at  the 

digitizer  entries  in  SYSCON  common  area, 
particularly  the  bloom,  which  reeds  to  be 
checked  after  initial  baseline  acquisitions. 
The  format  is  exactly  the  same  as  the  digitizer 
entry  section  of  the  output  of  task  SYSDMP. 


Piles:  DKO: [100,100]  SYSCON.DAT,  DK1: [100,100]  MAIN. DAT 

I/O  devices:  TI:,  digitizers,  attenuator  control  unit 

Description:  Task  CAL  acquires  the  calibration  trace,  reduces 

it,  and  stores  it  for  enabled  digitizers. 

Triggering  is  done  automatically.  The  raw 
calibration  trace  is  normalized.  The  digitizer 
knob  readout  is  compared  with  the  setting 
requested.  Standard  SASP  digitizer  and  channel 
error  codes  apply.  A NOC  (no  calibration  data) 
error  is  interpret ted  in  the  same  manner  as  a 
NOB  during  task  BASE.  The  transmitters  are 
allowed  time  to  warm  up;  the  number  of  seconds 
is  the  value  of  CNTXMT  in  the  SYMDEF 

Macro.1  There  is  a 3-s  pause  between 

calibration  triggering  and.  turning  off  the 
transmitters. 


CHKBAS 

FORTRAN  Written  July  1976 

Subroutines  called:  ANMODE,  ANSWER,  DATFIO  (OPENS,  READB,  CLOSES), 

GRABAS,  MOVABS,  SCIO  (SCIN) 

Files:  DKO:  [100,100]  SYSCON.DAT,  DK1 : [100,100]  MAIN.DAT 


I/O  device : TI : 

Description:  Task  CHKBAS  graphs  baseline  data  on  the 

Tektronix  (TEK)  R4010  graphic  display  console 
(TI : ) . The  program  queries  the  operator  with 
"CONTINUE?"  to  which  the  operator  types  "Y."  An 
"N"  response  (or  CR)  causes  the  question  to  be 
repeated.  (The  question  is  used  as  a dunwy 
pause  in  the  routine.) 


1Walter  J.  Scott  and  John  R,  Hiller , SKYNET  Applications  Software 
Package  (SASP)  Operator's  and  User's  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977) . 
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Common  areas: 


SYSCON,  BASDAT 


CHKCAL 

FORTRAN 

Subroutines 

Files: 

I/O  devices: 
Description : 


Common  areas 


I 


Written  May  1976 

called:  ANSWER,  ASDCD,  CHNERR,  DATFIO  (OPENS,  CLOSES, 

READB,  WRITER),  MINMAX,  SCIO  (SCIN,  SCOUT), 
XCHDRI 

DKO: [100,100]  SYSCON.DAT,  DKO : [100, 100] 
XCHCAL.DAT,  DK1 : [100,100]  Snnnnxx.DAT 

TI:,  LP0: 

Task  CHKCAL  evaluates  the  calibration  pulses 
emitted  from  the  calibration  pulse  generators, 
one  of  which  is  in  each  optical  data  link 
transmitter.  The  calibration  pulse  is  a bipolar 
signal  whose  amplitude  as  recorded  by  the  TEK 
R7912  transient  digitizer  is  a measure  of 
subsystem  gain.  The  subsystem  is  defined  as  the 
optical  data  link  and  any  amplifiers  or 
attenuators  between  the  link  receiver  output  and 
the  TEK  R7912  input. 

Task  CHKCAL  does  not  allow  operator  evaluation 
of  calibration  pulse  data  that  have  been  flagged 
by  the  normalization  routines  as  bad.  Task 
CHKCAL  automatically  computes  the  absolute  peak 
value  and  calculates  subsystem  gain,  stored  as 
data  link  gain  in  the  SYSCON.DAT  file  "channel" 
entry.  It  also  permits  the  operator  to  flag  bad 
calibration  pulses  and  input  comments  of  up  to 
24  characters. 

: SYSCON,  PARAM,  XCHCAL,  CALDAT 
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Flowchart : CHKCAL  ( Cont ' d ) 


OPERATOR 

COMMENT 


CALL 

MINMAX 


COMPUTE 
DATA  LINK 
GAIN 


' READ  IN 
COMMENT 
(CALCOM)  I 


! WRITE 
UPDATED 
PARAM 
ENTRY 


INCREMENT 
DIGITIZER  COUNTER 


/MORE\ 
DATA  TO 
PROCESS 

\ / 


/ WRITE 
UPDATED 
SYSCON 
ISCOUT)  i 


SHOT.  DAT  FILE 


SYSCON.  DAT  FILE 


Flowchart : CONGEN 


CONGEN 


INPUT  NUMBERS 
OF  DIGITIZERS, 
BOARDS»AND 
CHANNELS 


CALCULATE 

VIRTUAL  BLOCK  NUMBERS 
AND 

NUMBER  OF  BLOCKS 


INPUT 

DIGITIZER 

ADDRESSES 


OBTAIN 
TRANSMITTER 
' ADDRESSES 


'CREATE  SYSCON.  DAT 
FILE  AND  WRITE 
OUT  SYSCON 


STOP 


FORTRAN  Written  May  1976 

Subroutines  FXDCD , INPUT,  SCGEN, 

called : XCHSCH 

Files:  DKO:  [100,100] 

SYSCON.DAT, 

DKO:  [100,100] 

XCHCAL.DAT 

I/O  device : TI : 

Description:  Task  CONGEN  generates 
a new  system  con- 
figuration file, 

SYSCON.DAT,  and  ini- 
tializes the  following 
items:  number  of  dig- 
itizers (operator  in- 
put) , number  of  digit- 
izer controller  boards 
(operator  input) , num- 
ber of  channels  (oper- 
ator input) , virtual 
block  numbers , n a her 
of  blocks  for  a &.._ot 
file,  digitizer  UNIBUS 
addresses  (operator  in- 
put) , and  transmitter 
addresses  (from  the 
XCHCAL.DAT  file) . The 
remainder  of  SYSCON  is 
cleared . 
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DATA 


MACRO- 11 

Subroutines  called: 

Files : 

I/O  devices: 

Description: 


* Documentation  for 
given  in  this  report. 


Written  April  1976 

CALOR,*  CHKTRG,  CLRCBD , CMDDIG,  GETDAT,  INTABL , 
SCIO  (SCIN,  SCOUT),  SETVEC,  STCDAT , XMIT 

DKO: [100,100)  SYSCON.DAT,  DKl : [100 , 100 ) MAIN.DAT 

TI:,  digitizers,  attenuator  control  unit, 
calorimeter  control  unit 

Task  DATA  acquires  and  stores  raw  digitizer  data 
on  enabled  digitizers  and  acquires,  reduces,  and 
stores  calorimeter  data.  Triggering  occurs  from 
an  external  source  once  task  DATA  has  reached 
the  wait  mode  signified  by  the  message  "WAITING 
FOR  TRIGGER. " Standard  SASP  digitizer  and 
channel  error  codes  apply. 

At  the  start  of  task  DATA,  the  digitizers  are 
assumed  to  be  in  digital,  single-sweep  mode  with 
interrupts  disabled.  (This  state  is  to  be 
reached  by  using  task  PREDAT.) 

The  transmitters  are  allowed  time  to  warm  up  as 
in  task  CAL. 

The  proper  values  for  parameters  used  in 
subroutine  CALOR  are  to  be  determined  from 
documentation  on  the  EG&G  subroutine  CALOR  (for 
example,  the  comments  on  the  source  listings) 
and  the  calorimeters  involved. 


subroutine  CALOR,  written  by  EGSG,  Inc.,  is  not 
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Flowchart  s DATA 


READ  IN  SYSCON 


TURN  ON  TRANSMITTERS 

and  allow  to  warm  up 


arm  digitizers 


START  PROGRAMMABLE 
CLOCK 


I — 

[Tnable  trigger  interrupt 

/■WAITING  FOR  TRIGGER/ 


RECORD 

PROGRAMMABLE 
CLOCK  READING 
AND  TRIGGER 
TIME 


READ  CALORIMETERS  AND 
PROGRAMMABLE  CLOCK  AND 
REDUCE  DATA 


TURN  OFF  TRANSMITTERS 


ENABLE  DIGITIZER  INTERRUPTS  AND 
CHECK  FOR  TRIGGER  AND 

DISABLE  INTERRUPTS  


READ  DIGITIZERS  AND 
STORE  RAW  DATA 


'WRITE  OUT  SYSCON , 
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HTtll  TiTWP 


DATAPC 


MACRO-11  Written  April  1976 

Subroutines  called:  CALOR,  CHKTRG,  CLRCBD , CMDDIG,  GETDAT,  INTABL , 

PRICLR,  SCIO  (SCIN,  SCOUT),  SETVEC,  STCDAT,  XMIT 

Files:  DKO: [100,100]  SYSCON.DAT,  DK1 : [100 , 100 ] MAIN.DAT 

I/O  devices:  TI:,  LPO:,  digitizers,  attenuator  control  unit, 

calorimeter  control  unit 

Description:  Task  DATAPC  performs  all  the  actions  carried  out 

by  task  DATA  and  also  provides  a quick  dump  of 
the  raw  calorimeter  data.  This  additional  func- 
tion is  the  last  performed  before  task  DATAPC 
exits . 


ERASE 

FORTRAN 

Subroutine  called: 
I/O  device: 
Description : 


Written  May  1976 
PAGE 


TI: 


Task  ERASE  erases  the  screen  of  the  TEK  R4010 
console  or  issues  eight-line  feeds  to  the  LA36, 
whichever  is  TI : . 


Flowchart:  FIXNPT 


FIXNPT 


Q START 

I READ  IN  SYSCON  ] 


FORTRAN  Written  August  1976 


Subroutines  DATFIO  (CLOSES,  OPENS, 
called:  READB,  WRITER),  SCIO 

(SCIN,  SCOUT) 


Files:  DKO:  [100,100]  SYSCON.DAT, 

DK1 : [100,100]  MAIN.DAT 


Description:  Task  FIXNPT  provides  par- 

tial recovery  from  an 
overflow  condition  on  a 
digitizer  (error  code 
OVF) . The  count  for  the 
raw  data  points  is  forced 
to  be  2000  if  the  number 
of  raw  data  points  is 
found  to  be  greater. 


i 
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Flowchart : 


FLAG 


FLAG 


FORTRAN  Written  May  1976 


Subroutines 

called: 


ANSWER, 
DCDBIT, 
PAGE,  SCIO 
SCOUT) 


CHNERR, 

DIGERR, 

(SCIN, 


File: 


DKO: [100,100] 
SYSCON.DAT 


I/O  device:  TI: 


Description:  Task  FLAG  prints  the 
error  codes  present 
on  each  digitizer  and 
channel  and  allows 
enabling  or  dis- 
abling. The  question 
asked  is  "ENABLE?" 
Answering  with  "Y" 
clears  all  error  bits 
for  that  digitizer  or 
channel ; any  other 
answer  sets  the  dis- 
abled error  bit 
(error  code  DIS) . 
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Flowchart : KNOB 


KNOB 


MACRO-11  Written  April  1976 

Subroutines  CLRCBD , CMDDIG , 

called : SCIO  (SCIN, 

SCOUT) 

File:  DKO: [100,100] 

SYSCON.DAT 

I/O  devices : TI : , digitizers 

Description:  Task  KNOB  places 
all  enabled  dig- 
itizers in  the 
knob  setting  mode. 
Interrupts  Me 
disabled  r digit- 
izers initialized, 
switched  to  the  TV 
mode , and  their 
graticules  Me 
enabled.  Standard 
SASP  error  codes 
apply. 


LOG 

FORTRAN  Written  May  1976 

Subroutines  called:  ANSWER,  ASDCD,  FLDCD,  FXDCD,  INPUT,  PAGE,  SCIO 

(SCIN,  SCOUT) 

File:  DKO: [100,100]  SYSCON.DAT 

I/O  device : TI : 

Description:  Task  LOG  inputs  to  SYSCON  the  information  on  the 

probe,  transmitter,  receiver,  and  digitizer 
logs.  Choice  of  skipping  one  or  tore  logs  is 
provided.  Standard  SASP  terminal  input 
conventions  apply.  Items  are  not  checked  for 
validity. 


1 
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MARK 

FORTRAN 

Subroutines  called: 

Files: 

I/O  devices: 
Description : 


For  the  content  of  the  log  forms,  see  Data  Input 
Requirements,  SASP  Operator’s  and  User's 
Handbook • 1 

The  baseline  offset  position  (an  item  in  the 
digitizer  log)  is  input  in  units  of  minor 
divisions  and  is  converted  and  stored  in  units 
of  digitizer  points. 


Written  May  1976 

ANMODE,  ANOMRK,  ANSWER,  ASDCD,  DATFIO  (OPENS, 
READB,  READR,  WRITER,  CLOSES),  FIXAMP,  FXDCD, 
GRAATC.  INPCSR,  INPUT,  MOVABS , MRKCUR,  SCIO 
(SCIN) , XCHDRI 

DKO: [100,100]  SYSCON.DAT,  DKO : [100 , 100] 
XCHCAL.DAT,  DKl : [100,100]  MAIN . DAT 

TI:,  LP0 : 

Task  MARK  characterizes  the  unsealed  data  with 
timing  marks  to  mark  and  store  the  time  of  peak 
of  fiducial,  time  of  start  of  data,  and  time  of 
peak  of  interest.  Scaled  data  are  read  from  the 
MAIN.DAT  file,  unsealed,  and  plotted  for  each 
TEK  R7912.  The  operator  then  marks  the  data 
with  the  characterization  parameter  times  by 
setting  the  graphic  y-cursor  (which  appears 
automatically  at  the  proper  point  in  the 
program;  see  subroutine  INPCSR)  to  the  point  of 
interest  and  hitting  any  character  followed  by  a 
CR.  This  process  is  repeated  three  times,  once 
for  each  time  point.  The  operator  is  then 
queried  on  the  validity  of  the  entries  made  with 
the  cursor.  If  the  cursor  entries  are  judged  by 


lWalter  J.  Scott  and  John  R.  Hiller,  SKYHET  Applications  Software 
Package  (SASP)  Operator's  and  User's  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977) . 
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the  operator  to  be  unsatisfactory,  the  plot  is 
redisplayed,  and  the  operator  may  again  enter 
the  timing  parameters  using  the  graphic  cursor. 
This  process  is  repeated  until  acceptable  timing 
marks  have  been  selected. 

Next,  the  query  is  printed  for  the  required 
change  in  the  transmitter  attenuator  value  to 
optimally  place  the  data  on  the  TEK  R7912  target 
on  a subsequent  experiment.  Due  to  the 
nonrepeatable  amplitude  nature  of  the  OWL  II* 
simulator  output,  only  70  percent  of  the  usable 
system  dynamic  range  is  considered  as  an  optimal 
prediction  for  the  next  simulator  shot.  (For 
example,  if  90  percent  of  the  maximum  dynamic 
range  of  the  TEK  R7912  is  chosen  for  the  next 
shot  and  the  simulator  is  30  percent  higher  than 
predicted  for  that  shot,  then  the  data  will  be 
off  target,  and  information  concerning  the  peaks 
will  be  lost.)  If  the  previous  data  were  okay 
or  too  small,  zero  or  a negative  attenuation 
(gain) , respectively,  will  be  printed  in  the 
parentheses  following  the  query  "ADD  ^TTN  (X) 
dB."  Otherwise,  no  suggestion  to  the  operator 
will  be  made.  In  either  case,  the  operator 
should  look  at  the  plotted  data  and  enter  the 
required  amount  of  attenuation  or  gain. 

Finally,  the  operator  is  prompted  to  enter  a 
comment  of  24  characters  maximum.  A table  of 
recommended  attenuator  settings  for  each  channel 
is  then  printed  on  the  line  printer  for 
submission  to  the  data  user  £rior  to  the  next 
shot. 

Comnon  areas:  SYSCON,  NORDAT,  PARAM,  XCHHDR. 


*0il  Water  Line  Simulator  used  as  the  energy  source  for  the  SKYNBT 
experiments . 
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Flowchart:  MARK  (Cont'd) 


OFFLIN 


MACRO- 11 


Written  May  1976 


Subroutines  called: 
File: 

I/O  devices: 
Description: 


DIGERR,  LSTERR,  SCIO  (SCIN,  SCOUT) 

DKO: [100,100]  SYSCON.DAT 
TI : , digitizers 

Task  OFFLIN  checks  enabled  digitizers  for  being 
offline.  The  system  interrupt  handler  for 
vector  address  4 is  temporarily  replaced,  and  an 
initialize  command  is  sent  to  each  digitizer  in 
turn.  If  this  command  results  in  a trap  to 


23 


vector  4,  an  OFF  error  condition  is  flagged  and 
listed  for  the  digitizer. 


OUTFIL 

MACRO-11  Written  April  1976 

Subroutine  called:  SCIO  (SCIN) 


Files: 

Description : 

PRB 


DKO : [100,100]  SYSCON.DAT,  DK1 : [100,100] 
MAIN.DAT 

Task  OUTFIL  creates  a zero-filled  noncontiguous 
MAIN.DAT  file.  The  size  is  as  specified  by  the 
"number  of  blocks"  item  in  the  SYSCON  header. 


FORTRAN  Written  May  1976 

Subroutines  called:  ANSWER,  ASDCD,  FLDCD,  FXDCD,  INPUT,  PRB REF 

(PINIT,  PNEW,  PRDENT,  PRDNEX,  PRESET,  PWRADD, 
PWRENT) 

File:  DKO : [100, 100]  PRBCAL.DAT 

I/O  devices : TI : , LP0 : 


Description:  Task  PRB  performs  the  same  functions  toward  the 

probe  calibration  file,  PRBCAL.DAT,  as  task  ATN 
does  toward  the  device  calibration  file.  The 
reader  should  reference  the  task  documentation 
for  ATN,  replacing  the  device  with  the  probe. 
The  input  of  the  balun  number  is  checked  to  be 
sure  that  it  is  from  1 to  3.  (See  the  SASP 
Operator's  and  User's  Handbook,1  sect.  3.2.) 


Valter  J.  Scott  and  John  R.  Hiller,  SKYNET  Applications  Software 
Package  (SASP)  Operator's  and  User's  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977) . 
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PREDAT 

MACRO-11  Written  April  1976 

Subroutines  called:  CLRCBD , CMDDIG , SCIO  (SCIN,  SCOUT) 

Files:  DKO:  [100,100]  SYSCON.DAT,  DK1 : [100 , 100]  MAIN . DAT 

I/O  devices:  TI:,  digitizers 

Description:  Task  PREDAT  prepares  the  enabled  digitizers  for 

acquiring  a data  trace  (with  task  DATA  or 
DATAPC) . Interrupts  are  disabled;  the 
digitizers  are  initialized,  switched  to  the 
digital  mode,  and  checked  for  a single-shot 
mode.  Standard  SASP  error  codes  apply. 


PRTNAM 
FORTRAN 

Subroutine  called: 

File:  DKO: [100,100]  SYSCON.DAT 

I/O  device:  TI: 

Description:  Task  PRTNAM  prints  the  name  of  the  shot  file  to 

which  SYSCON  points.  (See  SASP  Data  File 
documentation. 1 ) 


Written  May  1976 
SCIO  (SCIN) 


r 

I 


RAWCPY 

FORTRAN 

Subroutines  called: 

Files: 

I/O  devices: 
Description: 


Common  areas : 


Written  May  1976 

SCIO  (SCIN),  DATFIO  (OPENS,  READR,  WRITER, 
READB,  CLOSES),  GRARAW,  PLTSF,  INPUT,  ASDCD, 
HDCOPY 

DKO: [100,100]  SYSCON.DAT,  DK1 : [100 , 100]  MAIN.DAT 
TI:,  LP0 : 

Task  RAWCPY  graphs  raw  TEK  R7912  data.  The  data 
for  each  TEK  R7912  are  plotted  and  annotated 
with  the  digitizer  number,  shot  number,  and  any 
operator  comments.  The  data  are  plotted  by 
using  the  TEK  R7912  coordinates,  sweep  speed 
(x)  and  vertical  sensitivity  (y) . Subroutine 
GRARAW  does  the  actual  plotting  using  the  TEK 
Terminal  Control  Software  (TCS)  graphics 
routines,  while  subroutine  PLTSF  annotates  the 
plot.  Entry  points  OPENS,  CLOSES,  READB,  READR, 
and  WRITER  are  in  subroutine  DATFIO,  the  disk 
"block  I/O"  transaction  support  program. 
Details  of  all  subroutines,  including  calling 
arguments  and  internal  parameters,  are  under  the 
appropriate  program  specification  for  that 
subroutine. 

HPTR,  SYSCON,  RAWDAT,  PARAM 


■ 

! 
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SCACPY 


FORTRAN 

Subroutines  called: 

Files: 

I/O  devices: 
Description : 


Common  areas: 


SCALE 

FORTRAN 

Subroutines  called: 
Files: 

I/O  device: 


Written  May  1976 

SCIO  (SCIN),  DATFIO  (OPENS,  CLOSES,  READB, 
READR,  WRITER) , PRBSCH,  I NT,  GRASCA,  MRKCUR, 
ANOSCA,  HDCOPY 

DKO: (100,100]  SYSCON.DAT,  DKO : [100 , 100] 
PRBCAL.DAT,  DK1 : (100 , 100]  SHOT.DAT 

TI:,  LPO : 

Task  SCACPY  graphs  scaled  TEK  R7912  data.  The 
data  for  each  TEK  R7912  are  plotted  on  the  TEK 
R4010  console  and  annotated  with  the  proper 
characterization  parameters.  " The  plot  is 
automatically  scaled  so  that  the  units/division 
are  listed  as  a readily  usable  number,  such  as 
0.1,  0.2,  or  0.5.  The  characterization  timing 
marks  annotated  in  task  MARK  also  are  plotted 
giving  a visible  presentation  of  the  operator's 
selection  of  the  mark  locations.  Derivative 
data  are  integrated  prior  to  plotting.  The  peak 
value  and  area  under  the  integrated  waveform  are 
stored  in  the  updated  parameter  entry  in  the 
current  SHOT.DAT  file.  Finally,  hard  copies  of 
scaled  data  are  generated  on  the  printer/plotter 
for  each  TEK  R7912. 

NORDAT,  SYSCON,  PRBCAL,  PARAM 
(See  flowchart,  p.  34.) 


Written  May  1976 

CALCSF , SCADAT,  SCIO  (SCIN,  SCOUT) , XCHDRI 

DKO: [100,100]  SYSCON.DAT,  DK1 : (100,100]  MAIN.DAT 
DKO: [100,100]  XCHCAL.DAT,  DKO: [100,100] 
PRBCAL.DAT,  DKO: [100,100]  ATNCAL.DAT 

TI: 
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Flowchart:  SCACPY 
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/ CALL 
COMMON  / SCIN 
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PARAM 

ENTRY  j 
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S 4010 
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DIGITIZER 

COUNTER 

HARD 
COPY  OF 
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I 


Description: 


Algorithms : 


Task  SCALE  calculates  the  overall  scale  factor 
and  data  link  delay  (Atdata) . The  raw 
data  trace  is  normalized  and  scaled,  and  the 
result  is  stored  in  the  MAIN.DAT  file.  The 
delay  and  scale  factor  are  stored  in  SYSCON. 
The  calibration  information  required  is  obtained 
from  the  calibration  files. 


Task  SCALE  checks  the  knob  readout  stored  in  the 
raw  data.  The  check  is  done  after  all  the 
calculations,  and  an  error  does  not  prevent  the 
storage  of  scaled  data.  However,  such  an  error 
does  prevent  the  digitizer  and  its  data  from 
being  referenced  until  the  flag  is  cleared. 


Running  task  SCALE  for  a channel  with  a bad  data 
link  gain  (particularly  zero)  results  in  FORTRAN 
execution  errors.  To  recover  from  such  errors, 
the  operator  generates  a proper  data  link  gain 
by  running  task  CAL  followed  by  task  CHKCAL,  or 
he  disables  the  channel  using  task  FLAG.  He 
continues  processing  the  other  data  by  rerunning 
task  SCALE. 


The  contributions  to  the  overall  system  gain  in 
decibels  are  found  in  the  following  equation: 


G 

sys 


where 


G,  + G„  + 
A P 


gd  + 


+ G + G 
TA.  DL 


G * gain  of  attenuator, 

A 

Gp  = gain  of  probe, 

Gd  = gain  of  device, 

G„  = gain  of  transmitter  balun, 

B 

G = gain  of  transmitter  attenuator, 

TA 

G = gain  of  transmission  channel. 

DL 

Gdl  is  calculated  by  task  CHKCAL  by  using  the  equation 

G jo  loo  cal  trace  peak  at  digitizer  (mV) 
DL  * °910.  cal  trace  pea*  at  generator  (mV) 


which  includes  any  attenuation  between  the 
receiver  and  the  digitizer. 
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The  scale  factor  is  the  overall  system  gain  in 
units  of  oscilloscope  volts  over  the  selected 
units  of  the  probe: 

A = logTl  -|P  . 
sys  10  20 

Since  normalized  data  are  in  units  of  digitizer 
points  of  which  there  are  64/vertical  division, 
scaled  data  are  given  by  the  following  equation: 


scaled  (selected  units) 


normalized  (points)  * vertical  sensitivity  (V/div) 
64  (points/div)  x A g (V/selected  units) 


With  integrated  data  for  which  are  introduced  an 
additional  factor  of  a change  in  time  (in 
seconds) , the  units  of  Gp  are  assumed  to  be  V-s/ 
selected  units,  and  those  of  Asys  become 
V-s/selected  units.  Integrated  scaled  data  then 
have  units  of  selected  units. 

The  contributions  to  the  overall  system  delay 
(in  nanoseconds)  make  up  the  following  equation: 


sys 

where 


D+D+D  +D+D  + D , 
A P TC  D DL  RC  ' 


D = delay  of  attenuator, 

A 

Dp  * delay  of  probe, 

D^  * delay  of  pretransmitter  cables, 

Dd  * delay  of  device, 

D = delay  of  transmission._cbannel, 

D * delay  of  postreceiver  cables. 

RC 
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SHOTNO 


FORTRAN 

Subroutines 

File: 

I/O  device: 
Description 


SUMERR 

FORTRAN 

Subroutines 

File: 

I/O  device: 
Description 

SYSCHK 

FORTRAN 

Subroutines 

Files: 


Written  April  1976 

called:  ASDCD,  FXDCD,  IASCII,  INPUT,  SCIO  (SCIN,  SCOUT) 

DKO: [100,100]  SYSCON.DAT 
TI: 

Task  SHOTNO  is  the  means  by  which  the  simulator 
code  and  the  shot  number  are  set  in  SYSCON. 
Standard  SASP  terminal  input  conventions  apply. 
No  input  for  the  simulator  code  is  permissible 
if  a valid  simulator  code  is  already  present  in 
SYSCON  (from  a previous  run  of  task  SHOTNO) . A 
one-  to  four-digit  number  must  be  given  for  shot 
number. 

Through  the  use  of  task  SHOTNO,  the  shot  file 
name  is  established. 


Written  June  1976 
called:  SCIO  (SCIN),  DCDBIT 

DKO : [100 , 100]  SYSCON.DAT 
LP0: 

Task  SUMERR  prints  the  error  codes  present  for 
each  digitizer  and  channel. 


Written  May  1976 

called:  ATNSCH , PRBSCH,  SCIO  (SCIN) 

DKO: [100,100]  SYSCON.DAT,  DKO: [100,100] 
PRBCAL.DAT,  DKO : [100, 100]  ATNCAL.  DAT 
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I/O  device: 


LPO: 


Description : 


SYSDMP 

FORTRAN 

Subroutine  called: 


Task  SYsCHk  checks  the  validity  of  certain 
entries  in  SYSCON.  These  are  attenuator  ID, 
probe  ID,  device  ID,  transmitter  attenuation, 
sweep  rate,  vertical  sensitivity,  and  baseline 
trace  offset.  The  last  is  reconverted  from 
points  to  minor  divisions  for  printing.  Any 
item  found  to  be  wrong  is  printed;  a blank 
implies  a valid  entry. 

The  first  page  of  output  includes  the  first  four 
items,  those  associated  with  a channel;  the 
remainder  are  on  the  second  page. 


Written  June  1976 
SCIO  (SCIN) 


File: 


DKO: [100,100]  SYSCON.DAT 


I/O  device: 


LPO: 


Description:  Task  SYSDMP  provides  a quick  dump  of  the 

meaningful  contents  of  SYSCON.  The  output  does 
not  presume  to  be  a polished  product,  but  is  to 
be  used  as  a system  "diagnostic."  Digitizer 
UNIBUS  addresses  and  digitizer  and  channel  error 
flags  are  printed  as  octal  numbers.  Alj.  other 
numbers  are  decimal.  To  interpret  the  error 
flags,  see  the  documentation  of  standard  error 
codes . * 


Written  April  1976 

ASDCD,  FXDCD,  IASCII,  INPUT,  SCIO  (SCIN,  SCOUT),. 
SCMAIN 


TABIN 

FORTRAN 

Subroutines  called: 


Walter  J,  Scott  and  John  R.  Hiller,  SKYNET  Applications  Software 
Package  (SASP)  Operator's  and  User's  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977). 
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Files: 


DKO: [100,100]  SYSCON.DAT,  DK1 : [100 , 100]  MAIN. OAT 


I/O  device: 
Description: 


TABLES 


TI: 

Task  TABIN  interrogates  the  operator  for  certain 
simulator  information  after  giving  him  the 
simulator  code  and  shot  number.  If  the 
simulator  code  is  02  (OWL  II) , a special  input 
mode  requests  the  wire  type,  pulse  charge,  tank 
vacuum,  voltage  diode  peak,  current  diode  peak, 
and  comment  of  30  characters  maximum. 
Otherwise,  a configuration  code,  an  output 
level,  and  a comment  are  requested.  The  SASP 
Operator's  and  User's  Handbook,  section  3.2,  has 
simulator  information.1 


FORTRAN 

Subroutines  called: 

Files: 

1/0  device: 
Description: 


Common  areas: 


Written  May  1976 

SCIO  (SCIN) , DATFIO  (OPENS,  CLOSES,  READR) , 
PRBSCH 

DKO : [ 100 , 100  T SYSCON . DAT , DKO : [ 100 , 100 ) 
PRBCAL.DAT,  DK1 : [100, 100]  Snnnnxx.DAT 


LP0: 

Task  TABLES  outputs  tabular  test  data  in  three 
tables:  (1)  Data  Parameters  Table,  (2)  System 

Configuration  Table,  and  (3)  Digitizer 
Parameters  Table.  The  header  for  each  of  the 
three  tables  contains  pertinent  parameters  that 
uniquely  describe  the  test  situation,  such  as 
shot  number  and  simulator  variables.  Table  I 
requires  the  parameter  entry  in  the  SHOT.DAT 
file  in  addition  to  the  PRBCAL  file  for  each 
channel.  Tables  II  and  III  use  the  SYSCON.DAT 
file  as  the  only  source  for  their  entries. 

SYSCON,  PRBCAL,  PARAM 


1Walter  J.  Scott  and  John  R.  Hiller,  SKYNET  Applications  Software 
Package  (SASP)  Operator’s  and  User’s  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977) . 
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Flowchart : TABLES 


s 


J 


Flowchart:  TABLES  (Cont'd) 
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USRCOM 


FORTRAN 

Subroutines 

Files: 

I/O  device: 
Description 


XCH 

FORTRAN 

Subroutines 

File: 

I/O  devices : 
Description 


Written  May  1976 

called:  ASDCD,  INPUT,  SCIO  (SCIN) , UCOUT 

DKO: [100,100]  SYSCON.DAT,  DK1 : [100,100]  SHOT . DAT 
TI: 

Task  USRCOM  records  a 64-character  comment  for 
each  data  trace.  The  input  corresponds  to  the 
channel  number  and  sweep  rate  printed  as  a 
prompt  by  task  USRCOM.  Standard  SASP  terminal 
input  conventions  apply. 


Written  May  1976 

called:  ASDCD,  FLDCD,  FXDCD,  INPUT,  XCHREF  (XNEW, 

XRDENT,  XRDHDR,  XWRENT,  XWRHDR) 

DKO : [ 100 , 100 ] XCHCAL . DAT 

TI:,  LP0 : 

Task  XCH  generates  and  maintains  the 
transmission  channel  calibration  file, 
XCHCAL.DAT.  Each  mode  of  operation  is  selected 
by  giving  the  proper  command  from  the  following 
list: 

GN:  generate  new  file 

MH:  modify  header 

ME:  modify  selected  entry 

PH:  print  header 

PE:  print  selected  entry 

PA:  print  contents  of  file 
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HE [LP]:  list  command  codes  in  response  to  MX:"  as  a 
prompt.  An  immediate  CR  terminates  the 
task. 

Standard  SASP  terminal  input  conventions  and 
data  input  requirements  apply. 

Modes  ME  and  PE  request  a channel  number;  an 
immediate  CR  causes  a return  to  the  command 
interpreter. 

Invalid  items  are  found  immediately.  An  "XX"  is 
printed  below  any  such  entry,  and  reinput  is 
requested.  Valid  items  may  be  skipped  with  a 
control  I.  Upon  an  incorrect  channel  selection 
in  inodes  ME  and  PE,  no  "XX”  is  printed,  but  the 
request  is  repeated. 


3.  INDIVIDUAL  SUBROUTINE  DOCUMENTATION 

The  following  standard  entries  have  been  used  to  document  the  SASP 
subroutines . 


Entry 

Definition 

Subroutine  name 

Name  of  subroutine 

Language 

DEC  PDP  11  FORTRAN  or  MACRO-11 

Date  written 

Date  that  subroutine  was  written 

Files 

Disk  files  referenced  by  subroutine 

I/O  devices 

I/O  devices  utilized 

Arguments 

List  with  description  of  arguments  in  order  called 

Description 

General  narrative  description 

Algorithms 

Description  of  any  signficant  algorithms  used 

Common  areas 

Areas  common  within  task 

Flowchart 

ANSI  symbols 

Typical  output 

Sample  of  typical  output 

Standard  format  entries  are  included  only  as  needed.  The 
Subroutine  Cross-Refere-  -e  List  (app  A)  and  the  Standardized  Cannon 
Areas  (app  B)  give  more  detailed  information. 
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ABSPKV 


FORTRAN  Written  May  1976 

Arguments:  ABIGi  returns  magnitude  of  peak  element  of 

arr ay  ATC(512) 

INDEX:  returns  array  index  at  which  ABIG 
occurred 

Description:  A subroutine  of  subroutines  FIXAMP  and  GRASCA, 

ABSPKV  is  used  to  compute  the  absolute  peak 
value  of  the  array  ATC . its  arguments  ABIG  and 
INDEX  return  the  absolute  peak  value  of  ATC  and 
its  INDEX,  respectively,  to  the  calling  routine. 

Ccranon  area : NORDAT 

(See  flowchart,  p.  47.) 


ANCMRK 

FORTRAN  Written  May  1976 

I/O  device : TI t 

Argument:  N7912:  TEK  R7912  unit  number 

Description:  A subroutine  of  task  MARK,  ANOMRK  is  used  to 

annotate  information  onto  the  plots  generated  by 
task  MARK.  The  TCS  graphics  routines  are  used 
to  position  the  start  point  for  all  WRITE 
statements  except  the  last  one. 

Common  area : SYSCON 


Flowchart : ABSPKV 


v 


ANOSCA 


FORTRAN 

Written  May  1976 

1/0  device: 

TI: 

Arguments: 

N7912:  TEK  R7912  transient  digitizer  unit 
number  (passed  through  subroutine  GRASCA 
argument) 

YMAX: 

data 

vertical 

scale  factor  printed  on 

scaled 

N:  "power  of  10"  printed  after  YMAX  as  vertical 
scale  factor,  YMAX  "E"  N,  such  as  10.2E+6MA/DIV, 
where  N = +6 

Description:  A subroutine  of  task  SCACPY,  ANOSCA  is  used  to 

annotate  scaled  TEK  R7912  data  plots  with 
various  test  parameters.  The  sources  for  all 
parameter  values  shown  on  the  plot  are  the 
common  areas  within  subroutine  ANOSCA.  These 
cannon  areas  are  filled  in  task  SCACPY.  The 
SYSCON  cannon  is  the  same  for  all  channels, 
while  PARAM  is  an  entry  in  the  SHOT . DAT  file. 
The  PRBCAL.DAT  file  is  the  probe  calibration 
file  used  to  obtain  the  "units"  printed  with 
the  vertical  scale  factor  in  the  upper  left 
corner  of  the  graph.  The  reference  for  the 
"units"  is  found  in  the  PRBCAL  common  area  and 
this  is  set  up  for  the  current  TEK  R7912  unit 
being  processed  by  task  SCACPY.  A sample  plot 
can  be  found  in  the  SASP  Operator's  and  User's 
Handbook,1  section  4. 


Cannon  areas: 


SYSCON,  PRBCAL,  PARAM 
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ANSWER 
MACRO-11 
I/O  device: 

Argument: 
Description : 


ASDCD 


MACRO- 11 


Arguments: 


Description: 


Written  May  1976 


ANSWER:  0 * NO,  1 • YES 

Subroutine  ANSWER  inputs  a single  character  from 
the  terminal.  If  the  input  is  null  or  a 
character  other  than  "Y,"  a "0"  is  returned.  A 
"1"  is  returned  only  if  the  character  is  a "Y." 
Standard  SASP  terminal  input  conventions  apply. 


Written  May  1976 

Null  flag:  1 ■ first  character  a blank 
0 ■ input  received 
-1  ■ field  empty 
-2  » no  such  field 
Field  number 
Output  character  string 

Number  of  characters  desired  for  output  string 

Subroutine  ASDCD  parses  an  ASCII  field  from  the 
terminal  input  buffer.  There  sure  three  possible 
courses  of  action  as  a function  of  the  null 
flag: 

Null  flag  of  0:  The  output  string  is  blank 
filled,  and  characters  are  transferred  from  the 
field  until  the  field  is  exhausted  or  the  number 
desired  is  reached,  whichever  comes  first. 

Null  flag  of  1:  The  first  word  of  the  output 
string  is  zeroed  out. 

Null  flag  of  -1  or  -2:  No  action  is  taken.  The 
output  string  is  untouched . 


ATNREF 

MACRO-11 
Files 
Argument : 
Description: 


Written  May  1976 

DKO : [ 100 , 100 ] ATNCAL . DAT 

Entry  point  ARDENT:  device  ID 

Multiple  entry  point  subroutine  ATNREF  is 
centered  about  a common  file  descriptor  block 
(FDB)  for  the  ATNCAL . DAT  file.  The  subroutine 
meets  the  file  referencing  needs  of  task  ATN. 
The  ATNCAL.DAT  file  is  opened  and  closed  with 
each  call.  The  function  of  each  entry  point  is 
as  follows: 

AINIT:  initialize  last  record  pointer;  clear 

current  record  pointer 

ANEW:  create  new  file  with  only  end-of-file 

record 

ARDENT:  search  file  for  entry  matching  given 
ID;  returning  entry  with  -l's  implies 
"no  such  entry" 

ARDNEX:  read  next  entry  (record) 

ARESET:  clear  current  record  pointer 
AWRADD:  add  record  to  end  of  file 
AWRENTi  rewrite  current  record 


ATNSCH 
MACRO-11 
File: 
Argument : 
Description : 


Written  May  1976 

DKO : [ 100 , 100 ] ATNCAL . DAT 

Device  ID 

Subroutine  ATNSCH  reads  in  the  ATNCAL.DAT  file 
entry  for  the  given  device  ID.  An  entry  of  -l's 
indicates  that  there  is  no  such  entry.  The 
ATNCAL.DAT  file  is  opened  and  closed  with  each 
call. 
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BASATC 


MACRO-11  Written  April  1976 

Arguments : Bloom  parameter 

Error  word 

Description:  Subroutine  BASATC  performs  the  ATC  step  of  the 

normalization  process  for  the  baseline  trace. 
The  bloom  parameter  also  is  calculated  as  the 
average  separation  in  points  between  dual 
verticals  in  the  baseline  data.  An  error  code 
of  0009  is  generated  if  the  bloom  is  not  from 
BI.MMIN  to  BLMMAX  or  the  number  of  dual  verticals 
(only  two)  is  less  than  NPTMIN.  Those  three 

variables  are  established  in  the  SYMDEF  Macro.1 


BUSY 
MACRO-11 
Arguments : 


Description : 


Written  April  1976 

Rl:  digitizer  UNIBUS  address 

R2:  error  word 

Subroutine  BUSY  allows  the  digitizer  referenced 
at  address  Rl  (register  1)  CNTBZY  seconds  (see 
SYMDEF  Macro1)  to  leave  a busy  status.  If  it 
does  not,  error  code  0004  is  generated  (that  is, 
BZYERR  is  placed  in  R2) . 
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CALATC 


MACRO-11 
Argument : 
Description: 


CALCSF 
MACRO-11 
Files : 

Arguments : 

Description: 

Algorithms : 


Written  April  1976 
Bloom  parameter 

Subroutine  CALATC  performs  the  ATC  step  of  the 
normalization  process  for  the  calibration  trace 
The  bloom  parameter  is  obtained  from  the 
digitizer  entry  in  the  SYSCON.DAT  file  by  the 
calling  routine.  The  parameter  should  be  the 
number  generated  by  a call  to  subroutine  BASATC 
for  a baseline  trace  after  which  the  digitizer 
intensity  was  not  changed. 


Written  May  1976 

DKO: [100,100]  SYSCON.DAT,  DKO: [100,100] 
ATNCAL.DAT,  DKO : [100 ,100]  PRBCAL.DAT, 
DKO : [ 100 , 100 ] XCHCAL . DAT 

Channel  number 

System  gain  in  decibels 


Subroutine  CALCSF  calculates  the  overall  system 
delay  in  nanoseconds  and  gain  in  decibels.  The 
delay  is  stored  directly  in  SYSCONj  the  gain  is 
returned  to  the  calling  routine  for  further 
processing. 


The  individual  task  documentation  for  task  SCALE 
is  used  for  subroutine  CALCSF. 


CALIB 


MACRO-11 
File : 

I/O  devices: 
Argument : 


Description: 


Written  July  1976 
DKO: [100,100]  SYSCON.DAT 
TI i , attenuator  control  unit 
MODE:  0 = ON 
1 = OFF 

( 2 = calibration  pulse 

Subroutine  CALIB  controls  the  transmitters  for 
task  CAL.  Commands  are  sent  to  the  transmitters 
for  all  channels  defined  in  SYSCON  without 
considering  the  error  flag.  An  error  resulting 
from  a command  is  listed  and  flagged  only  for  an 
enabled  channel. 


CHKTRG 


MACRO-11 


Written  March  1976 


File:  DKO: [100,100]  SYSCON.DAT 

I/O  devices:  TI:,  digitizers 

Description:  Subroutine  CHKTRG  checks  each  enabled  digitizer 

for  a trigger  interrupt.  An  error  code  of  0006 

is  flagged  and  listed  for  digitizers  without  a 
trigger  interrupt  after  a time  of  CNTCMD 
seconds.  (See  SYMDEF  Macro.1)  Since  the 
interrupt  handler,  subroutine  INTDIG,  locks  the 
memory  of  an  interrupting  digitizer,  subroutine 
CHKTRG  uses  a locked  memory  status  as  the 
indication  of  interrupt. 
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CHNERR 
MACRO- 11 


Files 


Arguments : 


Written  April  1976 
DKO : [ 100 , 100 ] SYSCON . DAT 
Error  word 
Dummy  argument 
Chaimel  number 


Description  Subroutine  CHNERR  flags  a channel's  error  and 

disables  the  associated  digitizers.  A bit  set 
(BIS)  instruction  is  used  so  that  no  previous 
error  flags  are  lost. 


CLRCBD 
MACRO-11 
I/O  devices: 
Argument : 
Descriptions 


Written  March  1976 
Digitizers 

Number  of  digitizer  controller  boards 

Subroutine  CLRCBD  clears  the  digitizer 
controller  boards,  thereby  disabling  the 
interrupts.  The  addresses  used  are 

ADRCB1  + n*10008 , n = 0,  1,  . . . , m - 1 , 


where  m is  the  argument  passed  and  ADRCB1  is 
established  by  the  SYMDEF  Macro.1 


Walter  J.  Scott  and  John  R.  Hiller,  SKYNET  Applications 
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CMDDIG 


MACRO-11 

Files 

I/O  devices: 
Arguments : 


Descriptions 


Written  July  1976 
DKO  s [100 , 100]  SYSCON.DAT 
TIs,  digitizers 
Set/clear  mode  (1/0) 

Command  word 
Status  word 

Subroutine  CMDDIG  sends  consnands  to  the  enabled 
digitizers  and  confirms  their  execution.  The 
subroutine  can  handle  any  command  except  "READ 
DATA."  The  status  word  sent  to  subroutine 
CMDDIG  is  the  word  that  should  be  compared  to 
the  digitizer  status  word  (with  a BIT 

instruction)  to  confirm  execution.  If  the 
status  bits  are  set  by  the  command,  the  mode 

should  be  "SET";  if  they  cure  cleared,  the  mode 

should  be  "CLEAR."  For  example,  if  the  digital 
mode  is  desired, 

CALL  CMDDIG  (1,  "2015,  "2Q0)  , 

since  bit  7 is  set  for  the  digital  mode. 
Command  and  status  words  are  defined  in  the 

SYMDEF  Macro.1 

If  a digitizer  remains  busy  for  CNTCMD  seconds, 
it  is  flagged  with  an  error  code  of  0004.  If  a 
command  does  not  execute,  repeated  attempts  are 
made  until  CNTCMD  seconds  have  passed.  After 
CNTCMD  seconds,  the  digitizer  is  flagged  with  an 
error  code  of  0005. 

The  command  is  sent  once  to  each  digitizer 
before  any  is  checked.  The  check/retry  process 
involves  one  digitizer  at  a time.  The  manner  of 
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the  initial  command  was  instituted  to  save  time 
in  switching  to  the  digital  mode  for  which  each 
digitizer  requires  a few  seconds.  These  times 
pass  in  parallel  rather  than  adding  together. 

See  Digitizer  Commands  and  Status1  for  a 
description  of  arguments  2 and  3. 


DATATC 
MACRO-11 
Argument : 
Description : 


Written  April  1976 
Bloom  parameter 

Subroutine  DATATC  performs  the  floating  point 
equivalent  of  subroutine  CALATC. 


DATFIO 
MACRO-11 
Files 
Argument  s 


Written  July  1976 
DK1: [100,100]  file  name 
Entry  points: 

CLOSES  NONE 


OPENS 

1 

as 

fnam 

, 2 * flen 

READB 

1 

s 

arr. 

2 = nblk,  3 

= iblk 

READR 

1 

s 

arr , 

2 = len,  3 = 

> recno 

WRITEB 

1 

- 

arr. 

2 = nblk,  3 

= iblk 

WRITER  1 * arr,  2 = len,  3 = recno 
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’ I 


where 


; 


fnam  = array  containing  file  name  from  byte  14 
to  byte  flen 

flen  = position  of  last  byte  of  file  name  in 
fnam 

arr  = start  address  for  data  transfer 

nblk  = number  of  blocks  (256  words/block)  for 
data  transfer 

iblk  = initial  block  for  data  transfer 

len  = number  of  words  for  data  transfer;  must 
be  even  divisor  of  256 

recno  - record  number  in  file,  assuming  records 
of  length  len 

Description:  Subroutine  DATFIO  accesses  the  SASP  data  files. 

This  subroutine  performs  block  1/0  at  all  times, 

but  permits  the  user  to  simulate  record  1/0. 

Record  transfers  do  not  necessarily  result  in 

disk  readouts  or  writeouts. 


The  functions  of  the  entry  points  are  as 

follows : 

CLOSES:  write  out  last  block  from  a record 
transfer  and  close  file 

OPENS:  open  file  and  initialize  flags  and 

pointers 

READB:  read  in  blocks  after  writing  out  last 
block  if  record  write  transfer  took 
place 

READR:  calculate  block  required  and  read  it  in 
if  different  from  last  block  used  in 
write  transfer 

WR1TEB:  write  out  blocks,  reverse  of  READB 

WRITER:  write  out  block  required,  reverse  of 
READR 
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DCDBIT 


MACRO-11 
Arguments  : 

Description : 


Written  May  1976 
Selection  word 

Table  of  16  four-character  codes 
Output  string 

Subroutine  DCDBIT  selects  entries  from  the  table 
and  places  them  in  the  output  string.  Each  bit 
in  the  selection  word  corresponds  to  a table 
entry,  bit  15  to  the  first  and  bit  0 to  the 
last.  Each  set  bit  selects  an  entry  in  the 
table  for  placement  in  the  output  string.  The 
length  of  the  output  string  (in  bytes)  is  four 
times  the  number  of  bits  set  in  the  selection 
word.  The  selection  word  is  scanned  from  bit  15 
to  bit  0;  the  entries  selected  for  output  are 
placed  in  the  output  string  in  reverse  numerical 
order . 


DIGERR 

MACRO-11 

File: 

Arguments : 


Description: 


Written  April  1976 
DKO: [100,100]  SYSCON.DAT 
Error  word 
Digitizer  number 
Dummy  argument 

Subroutine  DIGERR  flags  a digitizer's  error  and 
disables  the  associated  channel  (unless  an 
enabled  digitizer  also  is  connected  with  the 
channel) . A BIS  instruction  is  used  so  that  no 
previous  error  flags  are  lost. 
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DISABL 


MACRO-11 


Written  May  1976 


File: 


DKO : [100,100]  SYSCON . DAT 


Arguments : 


For  entry  point  DXSCHN:  channel  number 


ERRNUM 


For  entry  point  DISDIG:  digitizer  number 


Description : 


The  function  of  each  entry  point  is  as  follows: 


ELIMPT 


DISCHNt  sets  disable  bit  of  channel  error  word 
if  all  associated  digitizers  are  in  error 

DISDIG:  sets  disable  bit  of  digitizer  error 
word 


MACRO-11 


Written  April  1976 


Argument: 


Array  of  512  points 


Description : 


Subroutine  ELIMPT  carries  out  the  noise  point 
elimination  step  of  the  normalization  process 
with  floating  point  arithmetic  for  the  data 
trace . 


MACRO-11 


Written  March  1976 


Arguments : 


Error  word 


Number  of  bit  set 


Description : 


Subroutine  ERRNUM  returns  the  number  of  the 
left-most  bit  set  in  the  error  word. 
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EXTRAP 

MACRO-11  Written  April  1976 

Description:  Subroutine  EXTRAP  completes  the  normalization 

process  for  a baseline  trace.  The  ends  are 
extrapolated  to  provide  a complete  trace,  and 
"256"  is  subtracted  to  place  zero  at  the  target 
center  line. 


FIELD 
MACRO-11 
Arguments : 


Description : 


m*. 


Written  April  1976 

Null  flag:  1 = first  character  blank 
0 = input  received 
-1  = field  empty 
-2  = no  such  field 
Field  number 

Subroutine  FIELD  searches  and  counts  the 
characters  in  the  selected  field  of  the  terminal 
input  buffer.  All  fields  but  the  first  start 
with  control  I,  and  all  but  the  last  end  with 
control  I ; the  last  ends  with  zero  (NUL) , 
since  the  buffer  is  zero  filled  before  input. 

Subroutine  FIELD  was  designed  to  be  used  by 
ASDCD,  FLDCD,  and  FXDCD,  the  terminal  input 
buffer  decoding  subroutines. 

Subroutine  FIELD  also  determines  the  null  flag. 
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FIXAMP 


FORTRAN 
Arguments : 


Description : 


Common  area: 


Written  May  1976 

LARGE:  1 = amplitude  too  large,  off  TEK  R7912 
target 

0 = amplitude  too  small  or  okay 

IAT:  recommended  change  in  attenuator  for 
next  shot  (negative  value  indicates 
gain) 

A subroutine  of  task  MARK,  FIXAMP  computes  the 
required  amount  of  attenuation  or  gain  needed  to 
position  the  next  shot's  data  trace,  as  recorded 
on  the  TEK  R7912  target,  to  70  percent  of  the 
maximvr  dynamic  range  of  the  system.  Seventy 
percent  was  based  on  the  fact  that  the  OWL  II 
simulator  may  be  repeatable  only  to  30  percent. 
If  simulator  repeatability  is  better  than 
30  percent,  the  0.7  in  statement  XATTN  * 
0. 7*255/ABSPK  can  be  increased  accordingly.  If 
the  LARGE  flag  is  set  to  1,  then  task  MARK  uses 
this  fact  to  not  print  any  suggested  change  in 
attenuation.  That  is,  the  waveform  peak  is  off 
the  TEK  R7912  target,  so  no  prediction  is  made. 
If  the  LARGE  flag  is  set  to  0,  argument  IAT 
prompts  the  operator  for  the  suggested  (com- 
puted) change  in  attenuation.  This  change  is 
prompted  in  calling  task  MARK. 

NORDAT 


Flowchart : FIXAMP 


FLDCD 

MACRO-11 

Arguments: 


Written  April  1976 

Null  flag:  1 - first  character  blank 
0 * input  received 

-1  “ field  empty 

-2  * no  such  field 
Field  number 

Floating  point  variable 


Description:  Subroutine  FLDCD  decodes  a floating  point  number 

from  the  selected  field.  The  standard  SASP 
terminal  input  conventions  apply,  particularly 
for  the  null  flag. 

There  are  two  subfields  separated  by  an  "E"  to 
the  left  of  a floating  point  number.  To  the 
right  is  an  integer  exponent  of  no  more  than  two 
digits.  In  each  subfield,  an  odd  number  of 
minus  signs  gives  a negative  result.  All  other 
noninteger  characters  are  ignored.  The  exponent 
is  limited  to  keep  the  result  within  the  limits 
of  FORTRAN  conventions.  The  subfield  to  the 
left  is  limited  to  seven  digits.  The  exponent 
is  then  applied  by  multiplying  or  dividing  by 
10,  depending  on  its  sign.  This  step  also 
includes  the  proper  positioning  of  the  decimal 
point  in  the  original  floating  point  number 
which  was  recorded  with  a counter  incremented 
each  time  that  an  integer  character  to  the  right 
of  the  decimal  point  is  introduced  to  the 
present  intermediate  result. 

The  field  is  searched  from  left  to  right. 


FLGPTS 

MACRO-11  March  1976 

Description:  Subroutine  FLGPTS  searches  the  raw  digitizer 

data  and  flags  points  known  to  be  bad.  These 
points  are  the  repeated  horizontals,  the  last 
horizontal  read,  and  the  last  horizontal  on  the 
target.  Subroutine  FLGPTS  is  used  immediately 
after  reading  the  raw  data.  The  flag  is  the 
setting  of  bit  12  or  using  BADBIT  from  the 
SYMDEF  Macro.1  Any  routines  referencing  raw 
data  should  check  for  this  bit. 
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FLOTE 


MACRO-11 
Arguments : 

Description: 


FXDCD 
MACRO-11 
Arguments : 


Description : 


Written  April  1976 

Using  general  register  four  (R4)  as  a floating 
point  stack  pointer,  subroutine  FLOTE  removes  an 
integer  from  the  stack  and  places  the  floating 
point  equivalent  on  the  stack. 

Subroutine  FLOTE  converts  an  integer  to  a 
floating  point.  The  subroutine  is  used  with  a 
stack  pointed  to  by  R4.  This  use  minimizes  the 
code  for  executing  floating  point  operations 
that  require  the  floating  of  an  integer 
argument. 


Written  April  1976 

Null  flag:  1 = first  character  blank 

0 = input  received 
-1  = field  empty 
-2  = no  such  field 


Field  number 
Integer  variable 

Subroutine  FXDCD  decodes  an  integer  from  the 
selected  field.  The  standard  SASP  terminal 
input  conventions  apply,  particularly  for  the 
null  flag. 

An  odd  number  of  minus  signs  gives  a negative 
result.  All  other  characters  except  integers 
are  ignored,  including  the  decimal  point  (for 
example,  2.4  is  decoded  to  24). 

The  field  is  searched  from  left  to  right. 


GETBAS 


MACRO-11 
Files : 

I/O  devices: 
Description : 


Written  April  1976 

DKO: [100,100]  SYSCON.DAT,  DK1 : [100,100]  MAIN . DAT 
TI : , digitizers 

Subroutine  GETBAS  reads  digitizers,  normalizes 
baseline  traces,  and  stores  the  results  in  the 
MAIN . DAT  file  for  all  enabled  digitizers.  Error 
conditions  are  flagged  and  listed. 

The  normalized  baseline  trace  is  checked  for 
proper  positioning.  The  bloom  parameter  is 
calculated,  checked,  and  stored,  and  the  knob 
readout  is  checked. 

The  baseline  traces  are  written  into  the 
MAIN . DAT  file  beginning  at  the  block  pointed  to 
by  the  first  virtual  block  number  (VBN)  in 
SYSCON.  Anything  stored  there  previously 
(particularly  another  baseline)  is  overwritten. 


GETCAL 
MACRO-11 
Files : 

I/O  devices: 
Description : 


Written  April  1976 

DKO: [100,100]  SYSCON.DAT,  DK1 : [100,100]  MAIN , DAT 
TI:,  digitizers 

Subroutine  GETCAL  reads  digitizers,  normalizes 
calibration  traces,  and  stores  the  results  in 
the  MAIN . DAT  file.  This  reading  includes  the 
previously  stored  baseline  traces  for  use  in 
subroutine  ISBASE  and  provides  the  bloom  factor 
stored  in  SYSCON  to  subroutine  CALATC.  The  KR0 
is  checked.  All  these  functions  are  done  for 
each  enabled  digitizer.  Error  conditions  are 
flagged  and  listed. 
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The  traces  are  written  into  the  MAIN . DAT  file 
beginning  at  the  block  pointed  to  by  the  second 
VBN  in  SYSCON.  Anything  stored  there  previously 
is  overwritten. 


GETDAT 

MACRO-11  Written  April  1976 

Filess  DKO: [100,100]  SYSCON.DAT,  DK1: [100,100]  MAIN . DAT 

I/O  devices : TI : , digitizers 

Description:  Subroutine  GETDAT  reads  the  digitizers  and 

stores  the  raw  data  for  all  digitizers  that  are 
enabled.  The  only  error  condition  is  0015, 
which  is  caused  by  having  a previous  error.  It 
is  flagged  and  listed. 

The  raw  data  are  stored  in  the  MAIN . DAT  file  by 
using  the  third  VBN  in  SYSCON  as  a pointer. 

Previous  entries  are  overwritten. 


GRAATC 
FORTRAN 
I/O  device: 
Arguments : 


1 


Written  July  1976 
TI: 

ISIZE:  graph  size  parameter--one , largest; 

three,  smallest;  takes  on  value  1,  2, 
or  3 

I TYPE:  takes  on  value  1 for  ATC,  2 for  CAL,  3 
for  BASE,  or  4 for  RAW  data  waveforms 


N7912 : TEK  R7912  transient  digitizer  unit  man- 


r 


Description: 


Cannon  area: 


GRABAS 
FORTRAN 
I/O  device: 
Arguments : 


Description: 


Common  area: 


GRACAL 
FORTRAN 
I/O  device: 
Arguments : 


Subroutine  GRAATC  graphs  normalized,  floating 
point  data  waveforms  on  the  TEK  R4010  console. 
Parameters  ISIZE,  ITYPE , and  N7912  are  not  used 
internally:  they  acre  passed  onto  subroutine 
GRAT. 

NORDAT 


Written  July  1976 
TI: 


ISIZE: 


ITYPE: 


graph 
three , 
or  3 


size  parameter — one,  largest; 
smallest;  takes  on  value  1,  2, 


takes  on  value  1 for  ATC,  2 for  CAL,  3 
for  BASE,  or  4 for  RAW  data  waveforms 


N7912 : TEK  R7912  transient  digitizer  unit  number 

Subroutine  GRABAS  graphs  normalized,  integer 
baseline  data  on  the  TEK  R4010  console.  By  ac- 
quiring baseline  sweeps  prior  to  each  shot,  the 
STARS  console  operator  can  determine  if  the 
bloom  (intensity)  on  each  TEK  R7912  is  set  pro- 
perly. Under  normal  circumstances,  a printout 
of  the  bloom  parameter  is  sufficient,  and  run- 
ning subroutine  GRABAS  is  not  required. 

BASDAT 


Written  July  1976 
TI: 

ISIZE:  graph  size  parameter — one,  largest; 

three,  smallest;  takes  on  value  1,  2,  or  3 
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• • 


d 


Description; 

Common  area: 

| 

GRARAW 
FORTRAN 
I/O  device: 
Arguments : 

Description: 


GRASCA 
FORTRAN 
I/O  device: 
Arguments : 


ITYPE:  takes  on  value  1 for  ATC,  2 for  CAL,  3 
for  BASE,  or  4 for  RAW  data  waveforms 

N7912 : TEK  R7912  transient  digitizer  unit 
number 

Subroutine  GRACAL  graphs  normalized,  integer 
calibration  (CAL)  data  waveforms  on  the  TEK 
R4010  console 

CALDAT 


Written  May  1976 
TI: 

ISIZE:  graph  size  parameter — one,  largest; 

three,  smallest;  takes  on  value  1,  2,  or 
3 


N7912 : TEK  R7912 
number 


transient  digitizer  unit 


A subroutine  of  task  RAWCPY,  GRARAW  plots  raw 
(unnormalized)  data  waveforms  on  the  TEK  R4010 
console.  The  arguments  are  not  used  internally, 
but  are  passed  to  other  subroutines. 


Written  May  1976 
TI: 

N7912 : passed  through  to  subroutine  ANOSCA, 
current  TEK  R7912  transient  digitizer 

YMAX:  passed  through  to  subroutine  ANOSCA; 

vertical  scale  factor  is  printed  on 
scaled  data 
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A 


Description : 


Counon  areas: 


N:  passed  through  to  subroutine  ANOSCA  > 

power  o£  10  is  printed  after  YMAX  as 
vertical  scale  factor  in  YMAX"E"  N 
UNITS/DIV;  for  example  0.1E-5  GAUSS/DIV> 
power  of  10  of  scaled  data  in  ATC  array; 


A subroutine  of  task  SCACPY , GRASCA 
automatically  rescales  the  normalized,  scaled 
data  so  that  the  vertical  units/division  factor 
is  adjusted  to  a readily  interpretable  value. 
For  example,  1.0,  0.5,  and  0.25  V/division  aid 
the  operator  when  he  mentally  interpolates 
points  of  interest  on  a graph,  whereas  0.333  is 
not  readily  interpretable.  Next,  subroutine 
GRASCA  calls  subroutine  GRAT,  which  defines  the 
virtual  graph  window  y-coordiriates  in  terms  of 
the  easily  interpretable  Y (units/division) 
values  computed  in  subroutine  GRASCA— vertical 
range  coordinates  YMAX  and  YMIN. 

Depending  on  the  magnitude  of  the  peak  value  of 
the  scaled  data  array  ATC,  subroutine  GRASCA 
repeatedly  divides  or  multiplies  the  peak  by  10 
to  reduce  it  to  a number  between  0 and  1. 
Lastly,  the  rescaled  data  are  plotted  on  the  TEK 
R4010  console. 

It  is  important  to  understand  the  difference 
between  normalized  and  scaled  data.  The  raw 
TEK  R7912  data  must  first  be  normalized  or 
averaged  to  the  center  of  the  trace. 
Normalization  is  reducing  a multivalued  function 
to  a single-valued  function  of  time  by  a 
somewhat  complex  algorithm.  Scaling  is 
multiplying  the  unsealed  data  on  the  TEK  R7912 
target  by  the  various  system  gains  and 
attenuations  to  arrive  at  the  scaled  signal  as 
it  existed  at  the  front  end  of  the  system,  such 
as  at  the  input  of  a sensor. 

Also,  subroutine  GRASCA  defines  subroutine 
GRAT's  calling  parameters.  In  particular, 
ISIZE  = 2 and  TIC  *=  5 for  all  scaled  data  plots. 

SYSCON,  NORDAT,  PRBCAL,  PARAM 


69 


FORTRAN 


Written  April  1976 


I/O  device: 

TI: 

Arguments : 

ISIZE : 

takes  on  value  1,  2,  or  3;  one,  largest; 
three,  smallest  graph 

XMAX: 

maximum  x-coordinate 

XMIN: 

minimum  x-coordinate 

YMAX: 

maximum  y-coordinate 

YMIN : 

minimum  y-coordinate 

TIC: 

takes  on  value  4 for  8 major  divisions 

vertically  or  value  5 for  10  divisions 
(always  10  divisions  horizontally) 


Description:  Subroutine  GRAT  graphs  graticules  on  the 

TEK  R4010  console  in  three  sizes.  Each 
graticule  includes  frame,  center  lines,  and 
major  tick  marks,  one/division. 

Typical  output:  In  a typical  GRAT  output,  the  calling  arguments 

are  these: 


ISIZE  = 1 


The  coordinates  discussed  are  virtual  and  do  not 
determine  the  actual  graticule  size  displayed  on 
the  TEK  R4010  console.  See  the  TEK  TCS  manual 
for  details.4 


IASCII 

MACRO-11  Written  April  1976 

Arguments!  One-  to  four-digit  integer 

Left  half  of  ASCII  equivalent 
Right  half  of  ASCII  equivalent 

Description:  Subroutine  IASCII  converts  the  integer  into  four 

ASCII  digits  by  dividing  by  successively  smaller 
powers  of  10,  adding  60e  to  the  quotient,  and 
using  the  remainder  in  the  next  step. 


IFICKS 

MACRO-11  Written  April  1976 

Arguments:  Using  R4  as  a floating  point  stack  pointer, 

subroutine  IFICKS  removes  a floating  point 
number  from  the  stack  and  places  the  truncated 
integer  equivalent  on  the  stack. 

Description:  Subroutine  IFICKS  is  the  inverse  of  subroutine 

FLOTE.  It  converts  a floating  point  number  to 
an  integer  in  a manner  structured  for  use  with  a 
stack  pointer  of  R4. 


4 PLOT- 10 /Terminal  Control  System  User's 
Document  No.  062-1474-00  (1974) . 


Manual 


Tektronix,  Inc. , 


INPCSR 


FORTRAN 
I/O  device: 
Description: 


Common  area: 


INPUT 
MACRO-11 
I/O  device: 

Argument: 

I 


Description: 


Written  May  1976 
TI: 

A subroutine  of  task  MARK,  INPCSR  graphically 
inputs  the  time  (x)  coordinate  of  certain  points 
on  the  graphic  representation  of  the  TEK  R7912 
data  as  plotted  on  the  TEK  R4010  console.  In 
particular,  three  x-coordinates  are  input  by 
using  the  graphic  input  cursor  feature  of  the 
TEK  TCS  graphics  software.  The  subroutine 
prints  a message  to  prompt  the  operator  to  begin 
marking  the  data.  The  operator  then  positions 
the  displayed  y-coordinate  cursor  (the 
x-coordinate  cursor  is  displayed  but  not 
required)  to  the  point  of  interest  on  the 
displayed  data  plot  and  hits  any  key  followed  by 
a RETURN.  This  process  is  repeated  three  times 
to  input  the  following  parameters:  (1)  time  of 
peak  of  fiducial,  (2)  time  of  start  of  data,  and 
(3)  time  of  peak  of  interest.  Subroutine  INPCSR 
then  transfers  these  parameters  to  common  area 
PARAM.  The  PARAM  entry  in  the  SHOT . DAT  file  is 
then  updated  in  task  MARK. 

PARAM 


Written  May  1976 
TI« 

Null  flag:  -2  « immediate  CR 

0 « not  immediate  CR 

Subroutine  INPUT  inputs  up  to  80  characters  from 
logical  unit  number  (LUN)  5 to  the  terminal 
input  buffer.  The  character  count  is  checked 
for  being  zero  to  set  the  null  flag  properly. 
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The  buffer  is  zero  filled  to  begin.  Those  bytes 
not  filled  by  subroutine  INPUT  remain  zero. 

The  SASP  terminal  input  conventions  apply.1 * * * * * 


INT 

MACRO-11 
Arguments : 


Description : 


Written  May  1976 

Start  point  as  FORTRAN  subscript 

Sweep  rate  in  nanoseconds 

Subroutine  INT  carries  out  trapezoidal 
integration  of  a floating  point  data  trace.  The 
time  increment  (At)  is  calculated  in  seconds , 
based  on  the  sweep  rate  and  the  fixed  spacing  of 
horizontal  digitizer  points.  The  integration 
begins  at  the  selected  start  point  with  a value 
of  zero.  The  data  before  the  start  point  are 
multiplied  by  At  so  they  are  of  the  same 
magnitude  as  the  integrated  portion  to 
facilitate  graphing  the  result.  The  data  before 
the  start  point  do  not  contribute  to  the 
integral. 


Algorithm: 

!yn  x At  , n-1,  2,  . ..,  m - 1, 

0f  n“m  ' 
yn  + yn  i 

——5 — - — At  , n * m + 1,  m + 2,  . . . , 512, 


1 point  x s (ns/div) 

ns 

(51.2  points/div) (109  ns/s) 


Walter  J.  Scott  and  John  R.  Hiller,  SKYNET  Applications  Software 

Package  (SASP)  Operator's  and  User's  Handbook,  Harry  Diamond 

Laboratories  TR-1817  (August  1977) . 
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MjMWw.  i 


where 


resulting  vertical  (selected  units) , 

initial  vertical  (selected  units/S) , 

start  point  subscript, 
sweep  rate  in  nanoseconds. 


The  formula  for  At  is  based  on  a change  in  the 
x-coordinate  of  1 point  (512  points  in  10 
divisions) . 


INTABL 


MACRO- 11 


Written  March  1976 


I/O  devices: 


Argument: 


Description: 


Digitizers 

Number  of  digitizer  controller  boards 

Subroutine  INTABL  enables  digitizer  interrupts 
by  setting  the  enable  bit  of  the  controller 
status  word.  The  addresses  used  are 


ADRCB1  + n*10008  , n = 0,  1,  . . . , m - 1 , 


where  m is  the  argument  passed  and  ADRCB1  is 
established  by  the  SYMDEF  Macro.1 


1 Hal ter  J.  Scott  and  John  R.  Hiller,  SKYHET  Applications  Software 
Package  (SASP)  Operator’s  and  User’s  Handbook,  Harry  Diamond 
Laboratories  TR-1817  (August  1977).  ' 
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ISBASE 
MACRO-11 
Description » 


Written  April  1976 
Digitizers 

Subroutine  INTDIG  is  an  interrupt  routine  for 
handling  digitizer  interrupts.  The  only  action 
taken  is  to  lock  the  memory. 

There  is  a separate  entry  point  for  each 
digitizer  controller  board i 

INSCB1:  board  No.  1 
INSCB2 : board  No.  2 
INSCB3:  board  No.  3 
INSCB4 : board  No.  4 

Each  path  is  reentrant.  The  address  of  the 
interrupting  unit  is  calculated  from  the  address 
of  the  controller  board  and  the  device  number  is 
placed  in  the  controller  status  word. 


Written  April  1976 
Array  address 

Subroutine  INTRP  fulfills  the  interpolation  step 
in  the  normalization  for  the  data  trace. 
Floating  point  arithmetic  is  used. 


Written  April  1976 

Subroutine  ISBASE  performs  baseline  subtraction 
for  the  calibration  trace.  It  also  subtracts 
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LSTERR 


MACRO-11 


I/O  device: 


Arguments: 


Description: 


MINMAX 


MACRO-11 


Arguments: 


"256."  Both  are  steps  in  the  normalization. 
Integer  arithmetic  is  used. 


Written  May  1976 


Error  word 

Digitizer  number  or  zero 
Zero  or  channel  number 

Subroutine  LSTERR  lists  either  a digitizer  error 
or  a channel  error.  If  the  second  argument  is 
nonzero,  the  digitizer  is  listed.  Otherwise, 
the  channel  is  listed;  the  message  is  printed 
with  a QIO$  to  LUN  5 and  includes  ringing  the 
terminal  bell. 


Written  April  1976 


Integer  array 


Array  size 


Maximum 


FORTRAN  subscript  of  maximum 


Minimum 


FORTRAN  subscript  of  minimum 


Description: 


Subroutine  MINMAX  scans  the  input  array,  picks 
the  maximum  and  minimum  (signed)  values,  and 
records  their  positions  within  the  array.  These 
positions  are  then  converted  to  FORTRAN 
subscripts. 


MRKCUR 

FORTRAN  Written  May  1976 

I/O  device:  TI: 

Description:  A subroutine  of  tasks  MARK  and  SCACPY,  MRKCUR 

annotates  plots  generated  in  tasks  MARK  and 
SCACPY  with  short,  vertical  timing  ticks. 
(Subroutine  INPCUR  details  the  selection  of 
these  timing  ticks.)  In  task  MARK,  the  tick 
marks  are  used  to  picture  for  the  data  terminal 
operator  the  x-coordinates  for  three  timing 
parameters:  (1)  peak  of  fiducial,  (2)  start  of 

data,  and  (3)  peak  of  interest.  In  task  SCALE, 
the  tick  marks  convey  identical  information  to 
the  data  user/experimenter.  (The  reader  must  be 
familiar  with  the  basic  concepts  of  virtual  and 
screen  coordinates.)  The  position  of  the  tick 
marks  is  selected  by  using  the  TEK  TCS  graphics 
screen  coordinate  system.  Actually,  the 
location  of  each  tick  mark  is  stored  in  the 
current  SHOT . DAT  file  in  the  PARAM  entry 
pertaining  to  the  TEK  R7912  whose  data  are  being 
plotted.  Since  these  data  are  stored  as  512 
vertical  values,  the  corresponding  horizontal 
values  are  numbered  1 to  512.  Therefore,  the 
locations  of  the  timing  marks  are  numbers 
between  1 and  512.  To  draw  the  timing  marks  on 
the  scaled  data  (task  SCACPY) , it  was  necessary 
to  convert  the  mark  position  in  TEK  TCS  virtual 
coordinates  to  screen  coordinates  and  add  the 
distance  from  the  left  edge  of  the  screen  to  the 
left  edge  of  the  graph  to  this  value.  Doing  so 
avoided  the  problem  of  having  to  locate  the 
ticks  vertically  in  virtual  coordinates,  the 
solution  of  which  locating  would  have 


unnecessarily  lengthened  and  complicated  the 
routine. 


PARAM 


Flowchart : MRKCUR 


SUBROUTINE 


INITIALIZE 
OMMON  AND 
VARIABLES 


CALL 

TCS 

GRAPHICS 

ROUTINES 


I DRAW 
TIMING 
TICKS  ON 
4010 

CONSOLE 


4010 

CONSOLE 


RETURN 


Written  June  1976 


Subroutine  PAGE  erases  the  screen  of  the 
TEK  R4010  console  or  issues  eight-line  feeds  on 
the  LA36  teletype.  It  determines  the  terminal 
being  used  by  a GETLUN  (get  logical  unit  number) 
executive  call  and  checks  the  terminal  buffer 
size.  If  the  size  is  132,  the  terminal  is  the 


PLTSF 
FORTRAN 
I/O  device: 
Description: 


Common  area : 

PRBREF 
MACRO-11 
File: 
Argument : 
Description : 


format  * !°RTRA^  MRITE  statement  with  a "1" 
FORMAT  is  issued,  if  the  size  is  not  132  a tek 

TCS  ERASE  statement  is  used  to  erase  the  screen. 


Written  April  1976 


A subroutine  of  subroutine  GRARAW,  PLTSF 
annotates  the  TEK  R7912  vertical  and  horizontal 
scale  factors  onto  one  of  three  different-size 
Plots.  in  addition,  the  TEK  R7912  unit  number 
and  the  tpe  of  data  being  plotted  are  annotated 
beneath  the  plot. 


SYSCON 


Written  May  1976 

DKO: [100,100]  PRBCAL.DAT 


Entry  point  PRDENT:  probe  identification 

A multiple  entry  point  subroutine,  PRBREF  is 
centered  at  a common  FDB  for  the  PRBCAL.DAT 
file.  The  subroutine  meets  the  file  referencing 
needs  of  task  prb.  The  file  is  opened  and 
closed  with  each  call.  The  function  of  each 
entry  point  is  as  follows: 


PINIT:  initialize  last  record  pointer;  clear 
current  record  pointer 

PNEW:  create  new  file  with  only  end-of-file 


PRDENT:  search  file  for  entry  matching  given 
identification;  returning  entry  with 
-l's  implies  "no  such  entry" 

PRDNEX:  read  next  entry  (record) 


I 


PRESET:  clear  current  record  pointer 
PWRADD:  add  record  to  end  of  file 
PWRENT:  rewrite  current  record 


PRBSCH 
MACRO-11 
File: 
Argument : 
Description: 


PRICLR 
MACRO-11 
I/O  device: 
Arguments : 


Description: 


Written  May  1976 

DKO: [100,100]  PRBCAL.DAT 

Probe  ID 

Subroutine  PRBSCH  reads  the  PRBCAL.DAT  file 
entry  for  the  given  probe  ID.  An  entry  of  -l's 
indicates  that  there  is  no  such  entry.  The  file 
is  opened  and  closed  with  each  call. 


Written  July  1976 
LPO : 

x clock  count  at  trigger 
o 

Sample  count  on  calorimeter  channel  A 

Sample  count  on  calorimeter  channel  B 

Subroutine  PRICLR  quickly  dumps  the  raw 

calorimeter  data.  They  are  printed  in  five 

columns  of  20  time-amplitude  pairs  with  the  time 
first.  The  units  sure  10  ys  for  the  time  and 
1.95  yv  for  the  amplitude.  Such  a data  set  is 
printed  for  each  calorimeter  channel  and 
contained  on  one  page.  Channel  A is  in  the  top 
half  and  labeled  "TPS" ; Channel  B is  in  the 
bottom  half  and  labeled  n2B." 

The  integers  stored  in  the  PSECT  (program 
section)  CLRDAT  by  the  EG&G  routine  INITLZ  are 
converted  to  ASCII  by  dividing  by  successively 
smaller  powers  of  10.  Before  they  are,  however. 


i 


. 
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the  entries  beyond  the  sample  count  are  cleared, 
and  the  t time  is  subtracted  from  the  time 
values.  0 


QKELIM 
MACRO-11 
Argument  s 
Description: 


QKLNTP 
MACRO-11 
Argument : 
Description: 

RAWPLT 

MACRO-11 

Description: 


Common  areas: 


Written  April  1976 
512  integer  array 

Subroutine  QKELIM  carries  out  the  noise  point 
elimination  step  of  the  normalization  for 
baseline  and  calibration  traces.  Integer 
arithmetic  is  used. 


Written  April  1976 
512  integer  array 

Subroutine  QKLNTP  carries  out  the  interpolation 
step  of  the  normalization  for  baseline  and 
calibration  traces.  Integer  arithmetic  is  used. 


Written  May  1976 

A subroutine  of  subroutine  GRARAW,  RAWPLOT 
conditions  the  raw  data  array  and  pointers  for 
plotting.  The  raw  data  are  passed  through  IRAW, 
a 2046-element  array  in  which  each  word 
corresponds  to  a horizontal,  vertical,  or 
missing  horizontal  address  on  the  TEK  R7912 
diode  matrix  target.  Subroutine  RAWPLT  counts 
the  number  of  vertical  lines  associated  with 
each  horizontal  setting  and  stores  that  value  in 
the  corresponding  element  of  IHPTR  (the 
horizontal  pointer  array) . Also,  the  horizontal 
addresses  are  reordered  to  the  range  1 to  512 
(from  1023  to  512,  originally). 

HPTR,  RAWDAT 
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RDIG 


MACRO-11  Written  April  1976 

Arguments:  Digitizer  UNIBUS  address 

Error  word 


Description:  Subroutine  RDIG  reads  and  verifies  the  raw  data 

from  the  digitizer  specified.  During  the  first 
reading,  the  number  of  data  points  is  counted, 
and  a pointer  to  the  first  horizontal  on  the 
target  is  set.  A second  reading  compares  words 
with  the  first.  More  than  MISMAX  errors  causes 
a complete  repetition.  More  than  TRYMAX 
repetitions  causes  the  generation  of  error  code 
0007.  (TRYMAX  and  MISMAX  are  parameters  defined 
by  the  SYMDEF  Macro.1) 

At  each  data  word  read,  the  digitizer  is  checked 
for  a busy  status  with  the  subroutine  BUSY. 
Such  a status  generates  error  code  0004. 

No  more  them  RAWMAX  points  cure  stored  (plus  knob 
readout).  After  that  number,  the  reading  is 
completed,  but  the  remaining  words  are  not 
stored,  and  an  error  code  0002  is  generated.  If 
after  the  reading  and  verification  fewer  them 
RAWMIN  points  are  found,  error  code  0003  is 
generated.  The  RAWMAX  and  RAWMIN  parameters  are 
defined  by  the  SYMDEF  Macro.1  Their  values 
should  be  based  on  the  consideration  that  two 
vertical  addresses  per  horizontal  point  are  ideal 
and  gives  a total  number  of  raw  data  points 
512  + 2x512  or  1536.  Any  raw  data  trace  with  a 
number  of  points  significantly  different  from 
1536  proves  difficult  to  normalize. 


The  data  points  and  knob  readout  data  are  stored 
in  the  order  read  from  the  digitizer.  Since  the 
read  gun  begins  in  an  arbitrary  location  and 
wraps  around,  the  first  horizontal  point  read  is 
rarely  the  first  horizontal  point  on  the  target. 
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RDUKRO 


MACRO-11  Written  April  1976 

File:  DKO: [100,100]  SYSCON.DAT 

Arguments:  Digitizer  number 

Error  word 

Description:  Subroutine  RDUKRO  compares  the  raw  digitizer 

knob  readout  characters  with  internal  tables  of 
acceptable  settings.  The  entry  that  compares 
correctly  points  to  an  integer  value  that 
represents  the  setting  ("ns"  for  horizontal,  "V" 
for  vertical) . This  value  is  then  compared  with 
the  desired  settings  stored  in  SYSCON.  Not 
finding  a corresponding  entry  in  the  table  or 
having  the  value  different  from  that  desired  on 
either  vertical  or  horizontal  or  both  generates 
error  code  0008 , which  is  returned  to  the 
calling  routine  by  putting  KROERR  in  the  error 
word.  (See  SYMDEF  Macro.1) 

The  knob  readout  is  the  last  32  words  of  the  raw 
digitizer  data.  Each  word  is  flagged  when  bit 
15  is  set.  Each  word  has  only  one  character  in 
the  lower  byte  in' ASCII  format.  The  character 
may  be  lowercase.  If  so,  RDUKRO  converts  it  to 
upper  case  before  comparison. 

The  knob  readout  has  four  segments  of  eight 
words  each.  With  the  7A19  vertical  plug-in  and 
7B92  or  7B92A  time  base  plug-in  in  the 
digitizer,  only  the  first  and  last  segments  are 
used.  The  first  is  the  vertical  setting;  the 
last,  the  horizontal.  The  characters  are  right 
justified  in  the  segment  and  blank  filled  to  the 
left.* 

The  settings  permitted  are  1,  2,  5,  10,  20,  50, 
100,  200,  and  500  ns;  1,  2,  5,  10  and  20  (Is  for 
the  horizontal  and  10,  20,  50,  100,  200,  and 
500  mV  and  1 V for  the  vertical. 
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SCADAT 


MACRO-11 

Files: 

I/O  device: 
Description: 


Algorithms: 


Written  May  1976 

DKO: [100,100]  SYSCON.DAT,  DK1: [100,100]  MAIN.DAT 
Til 

Subroutine  SCADAT  normalizes  and  scales  the  raw 
data  and  stores  the  result  in  the  MAIN.DAT  file 
at  the  location  pointed  to  by  the  fourth  VBN  in 
SYSCON.  The  subroutine  functions  thus  only  for 
enabled  digitizers. 

The  standard  normalization  for  data  traces  is 
followed.  Baseline  and  raw  data  are  read  in 
from  the  MAIN.DAT  file.  The’  scale  factor  is 
obtained  from  SYSCON  (which  is  already  in  core) . 
The  knob  readout  is  checked.  This  check 
produces  the  only  standard  error  of  0008  and 
does  not  prevent  properly  scaled  data  from  being 
placed  in  the  MAIN.DAT  file.  However,  that 
digitizer  is  now  disabled  and  must  be  reenabled 
before  the  data  can  be  accessed. 

See  documentation  for  task  SCALE  in  section  2. 


SCGEN 

MACRO-11 

File: 

Description : 


Written  May  1976 

DK0 : [ 100 , 100 ] SYSCON . DAT 

Subroutine  SCGEN  creates  a new  SYSCON.DAT  file 
and  writes  into  it  the  contents  of  the  SYSCON 
common  area.  The  number  of  blocks  allocated  and 
written  is  NSCBLK.  (See  SYMDEF  Macro.1) 
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SC  10 


! 


MACRO-11 

File: 

Description  s 


SCMAIN 

MACRO-11 

Files: 

Description : 


SETVEC 
MACRO-11 
I/O  devices: 
Description: 


Writteri  April  1976 

DKO : [ 100 , 100]  SYSCON . DAT 

Dual  entry  point  subroutine  SC IO  is  centered  at 
a common  FDB  for  the  SYSCON.DAT  file.  The  entry 
point  functions  are  as  follows: 

SCIN:  read  in  SYSCON 

SCOUT:  write  out  SYSCON 

The  number  of  blocks  read  or  written  is  defined 
by  NSCBLK  in  the  SYMDEF  Macro.1 


Written  April  1976 

DKO: [100,100]  SYSCON.DAT,  DK1 : [100,100]  MAIN . DAT 

Subroutine  SCMAIN  writes  the  contents  of  the 
SYSCON  common  area  into  the  first  NSCBLK* s of 
the  MAIN . DAT  file  and  renames  the  MAIN.DAT  file 
to  correspond  to  the  standard  shot  file  name  as 
described  in  the  SASP  data  file 
documentation.1  The  variable  NSCBLK  is  defined 
in  the  SYMDEF  Macro.1 


Written  March  1976 
Digitizers 

Subroutine  SETVEC  sets  up  the  digitizer 
interrupt  vectors  and  priorities.  The  addresses 
for  the  vectors  are  the  entry  points  of  subrou- 


( 
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STCDAT 

MACRO-11 


tine  INTDIG.  The  priority  is  PRIDIG  ( ( digitizer 
priority)  as  defined  by  the  SYMDEF  Macro. 


Written  May  1976 


File* 


DKO: [100,100]  SYSCON.DAT 


description : 


SUBASE 


Subroutine  STCDAT  transfers  the  six  most 
significant  words  of  the  eight  returned  by  a 
GTIM  (get  time)  executive  directive  at  trigger 
time  into  the  date  and  time  storage  locations  in 
the  SYSCON  common  area.  The  words  are 
transferred  from  the  TIME  PSECT.  It  is  assumed 
that  the  date  and  time  storage  locations  in 
SYSCON  are  contiguous  and  in  that  order.  These 
locations  are  in  the  header  of  SYSCON. 


MACRO- 11 


Written  April  1976 


Description: 


UCOUT 


Subroutine  SUBASE  subtracts  the  baseline  and 
"256”  from  a data  trace.  End  gaps  in  the  data 
are  set  to  zero.  These  are  the  final  three 
steps  of  the  normalization.  Floating  point 
arithmetic  is  used. 


MACRO- 11  Written  May  1976 

Files:  DKO: [100,100]  SYSCON.DAT,  DK1 i [100 ,100] 

shot  file 


Description:  Subroutine  UCOUT  writes  the  user  comments  to  the 

shot  file  at  the  location  pointed  to  by  the 
sixth  VBN  in  SYSCON.  The  shot  number  and 
simulator  code  for  the  shot  file  name  are 
obtained  from  the  SYSCON  header.  The  comments 
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XCHDRI 
MACRO-11 
File  i 

Description: 


XCHREF 
MACRO- 11 
File: 
Argument: 

Description: 


are  assumed  to  have  been  stored  in  the  channel 
entry  section  of  the  5YSC0N  PSBCT.  (The 
original  channel  information  is  to  have  been 
overwritten  only  in  core  by  the  calling  task.) 

The  number  of  blocks  written  is  calculated  from 
the  sixth  VBN  and  the  total  number  of  blocks  for 
the  shot  file. 


Written  May  1976 

DKO: [100,100]  XCHCAL.DAT 

Subroutine  XCHDRI  opens  the  XCHCAL.DAT  file, 
reads  in  the  header  section  (the  first  three 
records) , and  closes  the  file.  The  header  is 
then  present  in  the  XCHADR  common  area. 


Written  May  1976 

DKO: [100,100]  XCHCAL.DAT 

Entry  point:  XNEW:  number  of  channels 
XRDENT:  channel  number 
XWRENT:  channel  number 

Multiple  entry  point  subroutine  XCHREF  is 
centered  at  a common  FDB  for  the  XCHCAL.DAT 
file.  The  subroutine  meets  the  file  referencing 
needs  of  task  XCH.  The  XCHCAL.DAT  file  is 
opened  and  closed  with  each  call.  The  function 
of  each  entry  point  is  as  follows: 


XNEW: 


create  new  file  large  enough  to  hold 
number  of  channels  given 


XRDENT:  read  in  entry  for  channel  number  given 
(goes  to  XCHCAL  PSECT) 

XRDHDR:  read  in  three  records  of  header 
information  (goes  into  XCHHDR  PSECT) 
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XCHSCH 


MACRO-11 


Argument: 


Description : 


MACRO-11 


File: 


I/O  devices: 


Argument : 


Description : 


XWRENT:  write  out  entry  for  channel  number  given 
from  XCHCAL  PSECT 

XWRHDR:  write  out  header  information  from  XCHHDR 
PSECT 


Written  May  1976 

DKO: [100,100]  XCHCAL.DAT 

Channel  number 

Subroutine  XCHSCH  reads  in  the  entry  in  the 
XCHCAL.DAT  file  for  the  channel  number  given. 
The  entry  is  placed  in  the  XCHCAL  PSECT. 


Written  April  1976 

DKO : [ 100 , 100 ] SYSCON . DAT 

TI : , attenuator  control  unit 


Mode  0 = on 
1 = off 

Subroutine  XMIT  controls  the  transmitters  for 
tasks  DATA  and  DATAPC.  Commands  are  sent  to 
enabled  channels.  A verification  error  is 
flagged  and  listed  as  code  0002,  and  the  unit  is 
turned  off.  An  off-line  error  is  flagged  and 
listed  as  code  0000.  Associated  digitizers  are 
disabled  for  channels  in  error. 

This  subroutine  is  not  to  be  used  for  executing 
the  calibration  trace  acquisition  sequence. 


RSTR 


MACRO-11 
Description  < 


.SAVE 
MACRO- 11 
Description  s 


Written  July  1976 

Subroutine  .RSTR  restores  registers  RO  to  R5 
from  the  stack.  It  is  the  inverse  of  subroutine 
.SAVE. 


Written  July  1976 

Subroutine  .SAVE  saves  registers  RO  to  R5  in  the 
stack.  It  is  the  inverse  of  subroutine  .RSTR. 


I 


ABBREVIATIONS 


ASCII  American  Standard  Code  for  Information 

Interchange 

ATC  Average  to  center  of  trace 

CAL  Calibration 

CR  Carriage  return 

DEC  Digital  Equipment  Corporation 

DKO:  Dish  unit  No.  0,  DEC  product 

DK1 : Disk  unit  No.  1,  DEC  product 

PDB  File  descriptor  block 

LA36  Teletype  terminal,  DEC  product 

LPO : Versatek  printer/plotter 

R4010  Tektronix  graphic  display  terminal 

(system  console  device) 

R7912  Tektronix  transient  digitizer 

TCS  Tektronix  Plot-10/Terminal  Control 

System  (software  used  to  drive  R4010) 

TE£  Tektronix,  Inc. 

TI:  R4010  display  console 

VBN  Virtual  block  qumber 

XRD  X-ray  detector 
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APPENDIX  A. —SUBROUTINE  CROSS-REFERENCE  LIST 


This  appendix  is  a cross-reference  listing  of  SKXNET  Applications 
Software  Package  (SASP)  subroutines . 1 For  each  subroutine,  the 
following  entries  are  given  (table  A-I) : 

a.  "Library"  refers  to  one  of  four  subroutine  libraries  to  group 
subroutines  that  perform  similar  functions:  INPUT,  NORMAL,  HANDLR,  and 
ERROR.  INPUT  contains  subroutines  used  to  convert  or  input  data  from 
the  Tektronix  (TEK)  R4010  console.  NORMAL'S  subroutines  perform  the 
steps  in  the  normalization  of  TEK  R7912  transient  digitizer  raw  data. 
Subroutines  in  HANDLR  are  needed  to  pass  commands  and  data  between  the 
TEK  R7912  and  the  central  processor.  ERROR  contains  subroutines  that 
process  digitizer  and  channel  errors . 

b.  "Subroutine  called"  lists  all  subroutines  called  by  this 
subroutine,  including  any  entry  points  used. 

c.  "Calling  routine"  lists  all  calling  subroutines  or  tasks, 
except  for  certain  subroutines  that  are  called  by  a large  number  of 
routines.  (All  entry  points  are  in  parentheses.) 


TABLE  A-I.  CROSS  REFERENCES 


Name  (entry  point) 

Library 

Subroutine  (entry 
point)  called 

Calling  routine 

ABSPKV 

None 

None 

FIXAMP 

GRASCA 

ANOMRK 

None 

MOVABS* 

ANMODE* 

MARK 

ANOSCA 

None 

MOVABS* 

ANMODE* 

SCACPY 

ANSWER 

INPUT 

ASDCD 

INPUT 

Many 

*See  footnote  at  end  of  table , p.  104. 
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TABLE  A- I . CROSS  REFERENCES  (Cont'd) 


(entry  point)  Library  04111119  routine 


(AINIT) 


(ARDENT) 

(ARDNEX) 

(ARESET) 

(AWRADD) 

(AWREOT) 

ATNSCH 

None 

None 

Mirny 

BASATC 

NORMAL 

None 

GETBAS 

BUSY 

HANDLR 

None 

RDIG 

CALATC 

NORMAL 

None 

GETCAL 

CALCS F 

None 

ATNSCH 

SCALE 

CALIB 

None 

FLOTE 

PRBSCH 

XCHSCH 

ATTEN  (ATTEN) 

CAL 

CHKTRG 

HANDLR 

CHNERR 

LSTERR 
. RSTR 
.SAVE 

DIGERR 

BASE 

CHNERR 

ERROR 

LSTERR 

.RSTR 

.SAVE 

DISABL  (DISDIG) 

CAL 

DATA 

DATAPC 

Many 

CLRCBD 

HANDLR 

None 

Many 

CMDDIG 

HANDLR 

DIGERR 

Many 

LSTERR 

APPENDIX  A 


TABLE  A-l.  CROSS  REFERENCES  (Cont'd) 


Kane  (entry  point) 

Library 

Subroutine  (entry 
point)  called 

Calling  routine 

.RSTR 

.SAVE 

DATATC 

NORMAL 

FLOTE 

SCADAT 

DATFIO 

(CLOSES) 

(OPENS) 

(READB) 

(READR) 

(WRITEB) 

(WRITER) 

None 

None 

Many 

DCDBIT 

ERROR 

None 

FLAG 

SUMERR 

DIGERR 

ERROR 

DISABL  (DISCHN) 

Many 

DISABL 

(DISCHN) 

(DISDIG) 

ERROR 

None 

CHNERR 

DIGERR 

ELIMPT 

NORMAL 

IFICKS 

SCADAT 

ERRNUM 

ERROR 

None 

LSTERR 

EXTRAP 

NORMAL 

None 

GETBAS 

FIELD 

INPUT 

None 

ASDCD 

FLDCD 

FXDCD 

FIXAMP 

None 

ABSPKV 

MARK 

FLDCD 

INPUT 

FIELD 

FLOTE 

Many 

FLGPTS 

HANDLR 

None 

GETBAS 

GETCAL 

GETDAT 

FLOTE 

INPUT 

None 

Many 

APPENDIX  A 


TABLE  A- I . CROSS  REFERENCES  (Cont'd) 


N— e (entry  point) 

Library 

Subroutine  (entry 
point)  called 

Calling  routine 

FXDCD 

INPUT 

FIELD 

Many 

GETBAS 

None 

BASATC 

BASE 

DIGERR 

I 


i 


APPENDIX  A 

TABLE  A-l.  CROSS  REFERENCES  (Cont'd) 


1 

Same  (entry  point) 

Library 

Subroutine  (entry 
point)  called 

Calling  routine 

GRARAW 

None 

RAWPLT 

RAWCPY 

GRAT 

1 

POINTA* 

1 

GRASCA 

None 

GRAT 

SCACPY 

MOVEA* 

drawa* 

ABSPKV 

GRAT 

None 

TWINDO* 

GRAATC 

DWINDO* 

GRABAS 

MOVEA* 

GRACAL 

DRAWA* 

GRARAW 

MOVER* 

GRASCA 

DRAWR* 

INITT* 

I ASCII 

ERROR 

None 

LSTERR 

I 

SHOTNO 

IFICKS 

INPUT 

None 

Many 

INPCSR 

None 

SETBUF* 

MARK 

VCURSR* 

INPUT 

INPUT 

None 

Many 

INT 

None 

PLOTS 

SCACPY 

ZNTABL 

HANDLR 

None 

BASE 

CAL 

DATA 

DATAPC 

- 

ZNTDIG 

HANDLR 

None 

SETVEC 

(INSCB1) 

(INSCB2) 

TEK  R7912  interrupt 

(INSCB3) 

(INSCB4) 


*See  footnote  at  and  of  table,  p.  104. 

101 


APPENDIX  A 


TABLE  A- I . CROSS  REFERENCES  (Cont'd) 


(entry  point)  Library  S^intO  ^called*"^  Calling  routine 


INTKP 

NORMAL 

FLOTE 

SCADAT 

IS BASE 

NORMAL 

None 

GETCAL 

LSTERR 

ERROR 

ERRNUM 

I ASCII 

Many 

MINMAX 

None 

None 

GETBAS 

CHKCAL 

MRKCUR 

None 

MOVABS* 

DRWREL* 

MARX 

SCACPY 

PAGE 

None 

ANMODE* 

INITT* 

BLMCHK 

ERASE 

FLAG 

LOG 

PLTSF 

None 

MOVABS* 

ANMODE* 

RAWCPY 

PRBREF 

None 

None 

PRB 

(PINIT) 

(PNEW) 

(PRD ENT) 

(PRDNEX) 

(PRESET) 

(PNRADD) 

(PWRENT) 


•See  footnote  at  end  of  table , p.  104. 


PRBSCH 

None 

None 

Many 

PRICLR 

None 

None 

DATAPC 

QKELIM 

NORMAL 

None 

GETBAS 

GETCAL 

QKLNTP 

NORMAL 

None 

GETBAS 

GETCAL 
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TABLE  A- I . CROSS  REFERENCES  (Cont'd) 


Bane  (entry  point) 

Library 

Subroutine  (entry 
point)  called 

Calling  routine 

RDIG 

HANDLE 

BUSY 

GETBAS 

GETCAL 

GETDAT 

RDUKRO 

None 

None 

GETBAS 

QBTCAL 

SCADAT 

SCADAT 

None 

DATATC 

DIGERR 

ELIMPT 

FLOTE 

LSTERR 

INTRP 

RDUKRO 

SCALE 

SUBASE 

SCGEN 

None 

None 

CONGBN 

SCIO 

None 

None 

Many 

SCMAIN 

None 

None 

TAB  IN 

SETVEC 

HANDLR 

INTDIG  (INSCB1) 

BASE 

(INSCB2) 

CAL 

(INSCB3) 

DATA 

(INSCB4) 

DATAPC 

STCDAT 

None 

None 

DATA 

DATAPC 

SUBASE 

NORMAL 

FLOTE 

SCADAT 

UCOUT 

None 

None 

USRCOM 

XCHDRI 

None 

None 

Many 

pg? 

None 

None 

XCH 

(XHEIf) 

(XROBMT) 

(XREHDR) 
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TABLE  A-l.  CROSS  REFERENCES  (Cont'd) 


Naae  (entry  point) 

Library 

Subroutine  (entry 
point)  called 

Calling  routine 

(XWRENT) 

(XWRHDR) 

XCHSCH 

None 

None 

Many 

XMIT 

None 

ATTEN  (ATTEN) 
CHNERR 

LSTERR 

.RSTR 

.SAVE 

DATA 

DATAPC 

. RSTR 

ERROR 

None 

Many 

SAVE 


ERROR 


None 


Many 


APPENDIX  B.— STANDARDIZED  COMMON  AREAS 


b defines  the  structure  and  contents  of  the  standardized 
areas  used  in  the  S1CYNET  Applications  Software  Package  source 

code. 

Area  Definition 

ATNCAL  ATNCAL . DAT  entry 

BAS DAT  Baseline  trace 

CALDAT  Calibration  trace 

LINE  Terminal  input  buffer 


NORDAT  Scaled  data  trace 

PARAM  Parameter  entry  of  shot  file 

PRBCAL  PRBCAL.DAT  entry 

RANDAT  Raw  digitizer  data 

SYS CON  Copy  of  SYSCON.DAT 

TIME  Time  and  date  of  trigger 

XCHCAL  XCHCAL.DAT  entry 

XCHHDR  XCHCAL.DAT  header 

Area  Variable 

ATNCAL  IDA (2) , GAIN,  DLAY , M0DL(4) , IMFR(4) , ISP3(2) 

BASDAT  IBASE  (512) 

CALDAT  I CAL  (512) 

LINE  INBUF  (40) 

NORDAT  ATC  (512) 

PARAM  IEPLG,  ITPIDO,  ITSDTA,  ITPEAK,  I TEND,  ITCAL,  TEST,  PEAK, 

TPEAK,  AREA,  CALCOM  (6),  RANCOM  (6),  SCACOM  (6),  ISPRE  (14) 


APPENDIX  B 


Area 

PRBCAL 

RAWDAT 

SYSCON 

(short 

form) 

SYSCON 

(long 

form) 

TIME 

XCHAL 

XCHHDR 

Area 

ATNCAL 


BASDAT 

CALDAT 

LINE 

NORDAT 

PARAM 


Variable 

ID(2),  TF,  DLY , IUNIT(4)  , IFLG,  IBLN,  MT,  ISP1,  MDL(4) , 
IMFG(4) , ICON (4),  PAR,  ISP2(4) 

IHPT,  NPTS,  IRAN (2046) 

IHDR(64) , IDIG (8,  20),  ICHAN(32,33) 


IDAT (3) , ITEM (3) , IASC(2),  ISBN,  NDIG,  NCB,  NCHAN,  IVBN(6) 
ISIM,  I WIRE,  CHARGE,  TV AC,  VDPV,  CDPV,  I COM (15) , NBLKS, 
CALOR1,  CAIOR2,  NSAMP1,  NS AMP 2,  ICLERR,  ISPARE (13) , 

IDIG (8,  20),  ICHAN(32,33) 

ITM(8) 

IXMT,  IFBR,  IREC,  ISP4,  DELAY,  CALI£V 

NOIN,  ISP6,  DTI,  DTR1,  DTR2,  DTF,  DTV,  BLN (3) , ISP7 (6) 


Variable  Definition 

DLAY  Device  delay  (nanoseconds) 

GAIN  Device  gain  (decibels) 

IDA  Device  ID 

IMFR  Manufacturer’s  serial  number 

ISP 3 Spare 

MODL  Model 

IBASE  Baseline  trace 

I CAL  Calibration  trace 

IN&UF  Terminal  input  buffer 

ATC  Scaled  data  trace 

AREA  Area  under  data  trace 

CALOOM  Cosment  on  calibration  trace 

XKFLG  Flag 

ITCAL  FORTRAN  subscript  for  peak  of  calibration -trace 

I TEND  FORTRAN  subscript  for  end  of  data  trace 

ITFIDC  FORTRAN  subscript  for  peak  of  fiducial  in  data 

trace 
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Area  Variable  Definition 


ITPEAK 

FORTRAN  subscript  for  peak  of  interest  in  data 
trace 

ITSDTA 

FORTRAN  subscript  for  start  of  data  in  data 
trace 

ISP  RE 

Spare 

PEAK 

Peak  of  interest  in  data  trace 

RAWCOM 

Conment  on  raw  data  trace 

SCACOM 

Comment  on  scaled  data  trace 

TEST 

Time  from  source  to  start  of  data 

TPEAK 

Time  from  start  of  data  to  peak  of  interest 

PRBCAL 

DLY 

Probe  delay  (nanoseconds) 

MDL 

Model 

MT 

Measurement  type 

I BLN 

Baiun  number 

ICON 

Connector 

ID 

Probe  ID 

IFLG 

Flag 

IMFG 

Manufacturer's  serial  number 

ISP1 

Spare 

ISP  2 

Spare 

IUNIT 

Units  for  scaled  data 

PAR 

Parameter 

TF 

Transfer  function  (decibels) 

RAWDAT 

IHPT 

FORTRAN  subscript  for  first  horizontal  in  raw 
data  trace 

I RAW 

Raw  data  trace  followed  by  knob  readout  charac- 
ters 

NPTS 

Number  of  data  points  in  raw  data  trace 

SYS CON 

I CHAN 

Channel  entries 

(short 

IDIG 

Digitizer  entries 

form) 

IHDR 

Header 

SYSCON 

CALOR1 

Result  for  calorimeter  channel  A 

(long 

CALOR2 

Result  for  calorimeter  channel  B 

fora) 

CDPV 

Current  diode  peak  value 

CHARGE 

Simulator  charge  level  or  pulser  output  level 

IASC 

American  Standard  Code  for  Information  Inter- 
change (ASCII)  shot  number 

I CHAN 

Channel  entries 

ICLERR 

Calorimeter  error  flag 

I COM 

Simulator  comment 

IDAT 

Trigger  date 

IDIG 

Digitizer  entries 

ISHN 

Integer  shot  number 
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Area 

Variable 

Definition 

ISIM 

Simulator  or  pulser  code 

ISPARE 

Spare 

ITIM 

Trigger  time 

IVBN 

Virtual  block  numbers  for  segments  of  shot  file 

I WIRE 

Wire  type  or  configuration  code 

NBLKS 

Number  of  blocks  in  shot  file 

NCB 

Number  of  digitizer  controller  cards 

NCHAN 

Number  of  channels 

NDIG 

Number  of  digitizers 

NS AMP 1 

Number  of  samples  taken  on  calorimeter  channel  A 

NS AMP 2 

Number  of  samples  taken  on  calorimeter  channel  B 

TVAC 

Tank  vacuum 

VDPV 

Voltage  diode  peak  value 

TIME 

ITM 

Trigger  time  and  date 

XCHCAL 

CALLEV 

Calibration  pulse  reference  level 

DELAY 

Transmission  channel  delay 

IFBR 

Fiber  number 

IREC 

Receiver  number 

ISP  4 

Spare 

IXMT 

Transmitter  address  (number) 

XCHHDR 

BLN 

Baiun  insertion  gain  (decibels) 

DTF 

Fiducial  path  delay  (Atf^,ju)  (nanoseconds) 

DTR1 

First  part  of  trigger  path  delay  (At  ) 

(nanoseconds)  trig  1 

DTR2 

Second  part  of  trigger  path  delay  (At  . ) 

(nanoseconds)  rlg  2 

DTV 

Vertical  plug-in  delay 

DTI 

Source  to  x-ray  detector  (XRD)  transit  time 
(nanoseconds) 

ISP6 

Spare 

ISP  7 

Spare 

NCHN 

Number  of  channels 

APPENDIX  C. — PLOT- 10/TERMINAL  CONTROL  SYSTEM  SUBROUTINES  USED  BY 
THE  SKYNET  APPLICATIONS  SOFTWARE  PACKAGE 


The  Terminal  Control  System  (TCS)  software,  a product  of  Tektronix, 
Inc.  (TEK) , Is  used  to  perform  plotting  on  the  TEK  R4010  graphic 
display  terminal.  The  TCS  contains  approximately  100  routines  with  some 
subroutines  nested  to  several  levels.  Only  those  TCS  subroutines  called 
directly  by  the  SKYNET  Applications  Software  Package  (SASP)  tasks  or 
subroutines  are  listed  here: 

ANMODE 

DRAWA 

DRAWR 

DRNREL 

DWINDO 


ERASE 


HDCOPY 


INITT 


MOVABS 


MOVEA 


MOVER 


POINTA 


SETBUF 


TWINDO 


VCURSR 


All  TCS  subroutines  required  to  run  the  SASP  are  in  the  TCS 
library.  These  TCS  subroutines  were  translated  from  FORTRAN  to  MACRO-11 
assembly  language  to  minimize  core  usage  and  execution  time.  A complete 
description  of  all  TCS  routines  is  given  in  the  TCS  User's  Manual.1 


1 PLOT- 10 /Terminal  Control  System  User's  Manual,  Tektronix,  Inc., 
062-1474-00  Release  So.  3 (September  1975). 
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